HohoPapa の回答履歴

全1656件中141~160件表示
  • 新・旧定額法の違い

    減価償却費の定額法の計算方式が、昔(H18年以前)と最近(H24以後)に取得したものとは方法が異なっていると聞いています。 最近のは、例えば耐用年数が10年の場合、取得価額に毎年「償却率0.1」を掛けるらしいのですが、結局昔の計算結果と同じになるのではないでしょうか。 なぜ、わざわざ「償却率」という紛らわしい名称の係数を導入する必要があったのでしょうか。

    • gihun
    • 回答数3
  • エクセルで連続しない範囲のデータ転記

    下記の Sub 転記TEST01() は正しく転記されます。 ただ、これでは何行にもなるので Sub 転記TEST02() のようにまとめてみました。ところが Sheet1のE37以下が#N/Aとなってしまいます。もちろん転記元のデータは#N/Aではなく数値です。なぜこうなるのでしょうか? Sub 転記TEST01() Set ws = ThisWorkbook.Sheets("TEST") With ThisWorkbook.Sheets("Sheet1") .Range("E4:E12").Value = ws.Range("AK4:AK12").Value .Range("E14:E15").Value = ws.Range("AK14:AK15").Value .Range("E20:E23").Value = ws.Range("AK20:AK23").Value .Range("E26").Value = ws.Range("AK26").Value .Range("E28:E50").Value = ws.Range("AK28:AK50").Value End With End Sub Sub 転記TEST02() Set ws = ThisWorkbook.Sheets("TEST") With ThisWorkbook.Sheets("Sheet1") .Range("E4:E12,E14:E15,E20:E23,E26,E28:E50").Value = _ ws.Range("AK4:AK12,AK14:AK15,AK20:AK23,AK26,AK28:AK50").Value End With End Sub

  • 電力量計等の減価償却方法について

    お世話になります。 資産の償却方法について質問があります。 質問タイトルのとおり、各種計量器については計量法により8年ごとに取替えを行わなければなりませんが、新品とバーター品の償却の方法はどのように行うのが正しいのでしょうか? 1 新品、バーター品ともに減価償却費が発生する。 2 新品は、減価償却、バーター品は取替法により減価償却させない。 3 そもそも取替えることが前提の資産は、取替法により取替に要した部品を修繕費として計上する。 以上、3点のどれを選択するのが正しいのでしょうか?

  • 新・旧定額法の違い

    減価償却費の定額法の計算方式が、昔(H18年以前)と最近(H24以後)に取得したものとは方法が異なっていると聞いています。 最近のは、例えば耐用年数が10年の場合、取得価額に毎年「償却率0.1」を掛けるらしいのですが、結局昔の計算結果と同じになるのではないでしょうか。 なぜ、わざわざ「償却率」という紛らわしい名称の係数を導入する必要があったのでしょうか。

    • gihun
    • 回答数3
  • エクセルの幅調整

    エクセル2004です。 添付画像のように縦左端と行番号の間を狭めたいのですがどうすればいいですか?

  • エクセルで複数のシートからのデータ抽出

    いつも大変お世話になっております。 Sheet1、Sheet2に名簿1、名簿2が作成してあり、同一表中に同じ氏名や姓が同じで名前違いがあり、それぞれに同じまたは別のTELや住所等の付帯情報が入っています。 この2つのっシートから、検索シートのB2セルに姓(例えば山本)だけを入れた場合に、山本を含む氏名の人の情報をリストにしたいのです。 複数シートのCOUNTIFとVLOOKUPで出来そうな気がしたのですが思うようにいかず。 どなたかHELPお願いします。 実際には製品名(シリーズの場合枝番が付いたりつかなかったり)で保管場所、容器サイズ、その他の情報をリストにするのが目的です。 つまり同じ製品名「A123」でもサイズ違いがあったり、保管場所が違ったり・・・をリストにしたいのです。

  • エクセルで複数のシートからのデータ抽出

    いつも大変お世話になっております。 Sheet1、Sheet2に名簿1、名簿2が作成してあり、同一表中に同じ氏名や姓が同じで名前違いがあり、それぞれに同じまたは別のTELや住所等の付帯情報が入っています。 この2つのっシートから、検索シートのB2セルに姓(例えば山本)だけを入れた場合に、山本を含む氏名の人の情報をリストにしたいのです。 複数シートのCOUNTIFとVLOOKUPで出来そうな気がしたのですが思うようにいかず。 どなたかHELPお願いします。 実際には製品名(シリーズの場合枝番が付いたりつかなかったり)で保管場所、容器サイズ、その他の情報をリストにするのが目的です。 つまり同じ製品名「A123」でもサイズ違いがあったり、保管場所が違ったり・・・をリストにしたいのです。

  • エクセルで複数のシートからのデータ抽出

    いつも大変お世話になっております。 Sheet1、Sheet2に名簿1、名簿2が作成してあり、同一表中に同じ氏名や姓が同じで名前違いがあり、それぞれに同じまたは別のTELや住所等の付帯情報が入っています。 この2つのっシートから、検索シートのB2セルに姓(例えば山本)だけを入れた場合に、山本を含む氏名の人の情報をリストにしたいのです。 複数シートのCOUNTIFとVLOOKUPで出来そうな気がしたのですが思うようにいかず。 どなたかHELPお願いします。 実際には製品名(シリーズの場合枝番が付いたりつかなかったり)で保管場所、容器サイズ、その他の情報をリストにするのが目的です。 つまり同じ製品名「A123」でもサイズ違いがあったり、保管場所が違ったり・・・をリストにしたいのです。

  • 減価償却

    減価償却費を計算するとします。 定率法の場合は、資産科目そのものの金額から減価償却費を 控除するわけではないと思うのですが実際、実務的には どうでしょうか。 資産科目、たとえば車両なら車両の帳簿の金額は減らすのですか。

    • ayumcom
    • 回答数5
  • 個人事業主がすべき申告(税)

    会計事務所で働いています。 お客様が個人事業主です。 商売をしていて従業員を数名だけ雇っていると仮定します。 その場合、記帳(何の費用がいくらとか会計ソフトに入れる) の必要があります。従業員の給料から源泉税を引いたときの 仕訳、源泉税を納付した仕訳などは処理すると思います。 一方、事業主本人の給料(というのが適当か分かりませんが)、 納付した源泉税なども会計ソフトに入力するのですか? あくまで会計処理するのはやっている商売そのものの消費税とか の申告のためのデータであって、事業主本人の所得税の 会計ではないと思ったので、事業主の給料、源泉税は会計データ 入力対象ではないようにも感じたのですか、どうでしょうか。

    • ayumcom
    • 回答数3
  • Excelで電話番号の0を保持して-を取り去るには

    Excelのシートに、 052-123-4567 080-1234-5678 のような電話番号が A1~A999のセルに入力されています。 これらのすべての電話番号の -(半角ハイフォン)を取り去って、 0521234567 08012345678 というようにしたいのですが、 置換で 検索する文字列のボックスに - (半角ハイフォン) 置換する文字列のボックスに空白 (何も入力しない) を指定して置換すると、 521234567 8012345678 というように-は削除されますが、 頭の0が取り省かれてしまいます。 これは、数値として扱われているため0が取り省かれていると思われます。 頭に'(半角アポストロフィー)を付けけばうまくいきますが、 すべての電話番号に'を付ける必要があり現実的ではありません。 (問1) セルの書式を文字列にして、 置換してみましたが、それでも0が取り省かれてしまいます。 先に、セルの書式を文字列にしてから、その後で、電話番号を読み込ませて、セルの書式が文字列になっていることを確認してから置換しても、0が取り省かれてしまいます。 なぜ、セルの書式を文字列にしても、0が取り省かれてしまうのでしょうか? (問2) 置換ダイアログのオプションで、 置換後の文字列の書式の表示形式で文字列を指定して、 置換してみると、 -が取れ省かれずに 052-123-4567 のままになっています。 置換後の文字列の書式の表示形式で文字列を指定しないと -が取り省かれるのに、 置換後の文字列の書式の表示形式で文字列を指定すると、 なぜ、-が取り省かれなくなるのでしょうか? (問3) 0が取り省かれずに-を取り除くように置換するには、 どのようにすればよいのでしょうか。 よろしくお願いします。 (Windows10)

  • 会計の初歩的な質問

    会計の初歩的な質問です。 売上高-売上原価=粗利 ここから販管費等がマイナスされ最終的に残ったお金に法人税が 掛けられると思います。 であればですよ、例えば金などを販売している、いくら在庫しても腐らないものを扱っている業種の場合、利益が出そうな年は毎回限界まで在庫として仕入れておけば、永遠に法人税を払うことなく、価値の落ちない棚卸資産(在庫)が大量にストックされ、すごく儲かるような気がします。 もちろん大半の品物は時間とともに価値がなくなるのでこの方法は使えませんが、時間とともに価値の落ちないものを扱う業種なら、法人税を全く払わない裏技だと思うのですが、どこかに落とし穴があるのでしょうか?

  • 会計の初歩的な質問

    会計の初歩的な質問です。 売上高-売上原価=粗利 ここから販管費等がマイナスされ最終的に残ったお金に法人税が 掛けられると思います。 であればですよ、例えば金などを販売している、いくら在庫しても腐らないものを扱っている業種の場合、利益が出そうな年は毎回限界まで在庫として仕入れておけば、永遠に法人税を払うことなく、価値の落ちない棚卸資産(在庫)が大量にストックされ、すごく儲かるような気がします。 もちろん大半の品物は時間とともに価値がなくなるのでこの方法は使えませんが、時間とともに価値の落ちないものを扱う業種なら、法人税を全く払わない裏技だと思うのですが、どこかに落とし穴があるのでしょうか?

  • Excelの複数シートの印刷について

    Excelの1つのブックに80くらいのシートを作ったファイルがあります。 シートを複数選択してA4片面に印刷したいのですが、シート1、2,3,4と選択して印刷する(両面印刷オフ)と1,4は片面印刷で、2,3は両面印刷になります。いくつかやってみましたが、最初と最後のシートだけ片面で、あとは全部両面で印刷されるようです。プリンタのプロパティは片面に設定するのですが何度やっても同じでした。何か対処方法がありますか?Excel側の問題でしょうか?ちなみにプリンタはエプソンLX10050MFです。

    • pusuta
    • 回答数6
  • ハイパーリンクをコピペしてください

    マクロで選択した各列の5行目以降に単独または連続コピペしたハイパーリンク付き文字列を下記のマクロにて第二階層分を上から順番にそのおのおの同じ行の隣の列にテキストファイルにてコピペ(セル内32767文字制限以下)してから置き換えで「*)は、」と「。*」で文字列を省略してください。 Sub HyperlinkFollowTest() On Error Resume Next Dim h As Hyperlink Dim sht As Worksheet Set sht = ActiveSheet '// シートの全ハイパーリンクをループ For Each h In sht.Hyperlinks '// ハイパーリンクを実行 Call h.Follow Next End Sub

    • noname#252684
    • 回答数3
  • 削除される行と、されない行があります

    VBAで、もしD列とE列が同じ数字ならその行を削除、 という式を作りました。なお、D列が0より大きいときに その式を適用するようにしました。 なぜか、D列とE鉄が同じ場合は、きちんと削除されるのに、 ある行だけ削除されません。 理由がわかりませんでした。 どのようなことが考えられますか。 D列もE列も半角で数字が入っていました。

    • ayumcom
    • 回答数6
  • ハイパーリンクをコピペしてください

    マクロで選択した各列の5行目以降に単独または連続コピペしたハイパーリンク付き文字列を下記のマクロにて第二階層分を上から順番にそのおのおの同じ行の隣の列にテキストファイルにてコピペ(セル内32767文字制限以下)してから置き換えで「*)は、」と「。*」で文字列を省略してください。 Sub HyperlinkFollowTest() On Error Resume Next Dim h As Hyperlink Dim sht As Worksheet Set sht = ActiveSheet '// シートの全ハイパーリンクをループ For Each h In sht.Hyperlinks '// ハイパーリンクを実行 Call h.Follow Next End Sub

    • noname#252684
    • 回答数3
  • 削除される行と、されない行があります

    VBAで、もしD列とE列が同じ数字ならその行を削除、 という式を作りました。なお、D列が0より大きいときに その式を適用するようにしました。 なぜか、D列とE鉄が同じ場合は、きちんと削除されるのに、 ある行だけ削除されません。 理由がわかりませんでした。 どのようなことが考えられますか。 D列もE列も半角で数字が入っていました。

    • ayumcom
    • 回答数6
  • エクセルで成績順・均等の併存するグループ分け

    エクセルを利用して、以下のようなグループ分けをしているのですが、これを自動化させたいと考えています。 サンプルデータを元にご説明します。(サンプルは疑似データです) 1.連番、氏名、性別、点数の表から、E22セルのカッティングポイントを元に、IF関数でA,Bの仮グループを作る。10点以上ならA、未満ならB(「作業前」参照) 2.Bグループはそのまま決定。 3.「仮グループA」「男」でフィルターをかけ、「決定グループ」列に名簿上から順にA1,A2,A1,A2,...と入力 4.「仮グループA」「女」でフィルターをかけ、「決定グループ」列に名簿上から順にA1,A2,A1,A2,...と入力(「作業中」参照) 5.グループ分け完成(「作業完了」参照) 以上ですが、伝わりますでしょうか? これらの作業を、できればVBAでボタンを押すと自動で実行できるような方法を探しています。 アドバイス頂ければ幸いです。

  • いずれかの条件を含むデータを全て抽出したい

    シート1(ここに貼り付ける)に元データを貼り付けたら、シート2、シート3に必要なデータを自動で抽出出来るような関数を組みたいです。 シート1のD列の商品名の中に「標準」か「キャリブ」いずれかの文字を含むものはシート2に。「染色」か「マルチ」いずれかの文字を含むものでB列が「血液検査」のものはシート3に。というように条件を複数指定して、該当するものは丸々抽出したいです。どなたか分かる方教えてください。よろしくお願い致します!