- 締切済み
エクセル ＶＢＡ自動合計算出について
エクセル ＶＢＡで悩んでいます。 内容としては、エクセルデータをアクセスに取り込みたいのですが、表の合計をＳＵＭにて合計した値を取り込んだ場合、文字列になってしまいアクセスで数値の認識されません。よってエクセル ＶＢＡを使用し、自動計算させたいと考えています。 具体的にすると画像の赤部分の名称1から名称9までを指定し、縦の数値を合計し、その後 1列空白行を作り、名称１０から名称16までを自動計算させるというプログラムにしたいのです。 上記のようなプログラム組めるでしょうか？ アドバイスをいただけないでしょうか？
- kazunoko1689
- お礼率23% (5/21)
- Excel（エクセル）
- 回答数1
- ありがとう数0
- みんなの回答 （1）
- 専門家の回答
みんなの回答
- banzaiA
- ベストアンサー率16% (100/595)
関連するQ&A
- Excel VBAの SUM関数について質問です。
Excel VBAの SUM関数について質問です。 SUM関数で合計の値を出す場合、 SUM（A1:A5）という関数で合計を出しますが SUM(sheet2.cells(1,1),sheet2.cells(5,1)) と言ったようにCellsで指定はできないのでしょうか？ 複数の列にVBAのプログラムで合計の値を出したいのです。 WorksheetFunction.SumではSUM（A1:A5）のように 自動計算にならないと思うので・・・
- ベストアンサー
- その他（プログラミング・開発）
- エクセル 列の合計のVBA
エクセルの縦の列におきまして たとえば列A1からA31までの セル 数値が 入っています、を 合計してA33に返すとして これをコードのなかの 一連の作業として行いたいので VBAで試行錯誤していますが Cells(33, "A").Value = Application.WorksheetFunction.Sum("Cells(1, "A"):Cells(31, "A")") Cells(33, "A").Value = Application.WorksheetFunction.Sum("A1:A31") いずれも稼働しません 宜しくお願い致します win10 office365
- ベストアンサー
- その他（プログラミング・開発）
- エクセルの合計で質問です。
エクセルで合計のことで質問させてください。 教えてください、1~9行目に仕入れ金額が入っていて10行目に1~9をオートSUMで合計したとします。 たとえば9行目と10行目の間に行を挿入して商品名をどんどん追加した場合には現在ではオートSUMが反映されません。 ドラッグすればいいかと思いますが単純作業なだけになんとか自動計算させたいです。 やり方を申し訳ございませんが教えてください。 宜しくお願い致します。
- ベストアンサー
- Excel（エクセル）
- 総計をエクセルVBAで出すには。。
A列にいくつかランダムに小計が入っておりB列の数値をA列の小計が入っている 行まで数式で足しています。 例=SUM(B16:B20) A列の最終行に総計が入っているのですが総計にはB列のいくつかの小計行を 足して総計を出したいです。 小計を出すにはこちらで教えて頂き、VBAで自動でいれることができたのですが 総計をいれることができません。 VBAではどのように組めばいいのでしょうか？
- ベストアンサー
- その他（プログラミング・開発）
- エクセル 列の数値の合計の表示について、
エクセル 列の数値の合計の表示について、 ごく基本的なことだと思いますが、教えてください。 例えばA列に上から順に数値を入れていき、その合計をB列に表示させるとします。 私のやり方はB列の計算式を=B1+A2としてこのコピーを、数値の数だけ下に下げることで目的を達しました。 すでにA列に数値が何個も入力している場合はこれで良いのですが・・。 ここから質問なのですが、例えばA列に現在10個数値がありB列に順番にその合計が出ているとします。 次にA列11行目に新規に数値を入力した時に、自動的にその合計がB列に出るようにしたいのです。 予めB列の数式のコピーを11行目以降に延ばしておくと、10行目の合計の数値が延ばした行まで並ぶので困っています。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- EXCEL 空白を除く合計を求める
0以下の数値を空白で表示する書式を使用しています。 なので見た目には数値は入力されていないように見えるのですが、 SUM等の合計式を使用すると空白の部分も計算されてしまいます。 空白で表示されている部分を（0以下の数値の部分）を除いた合計式を関数で探しているのですが、分かりません。 どなたかご教授お願いします。
- ベストアンサー
- その他(業務ソフトウェア)
- エクセルVBAで質問です。
エクセルVBAで質問です。 A列 B列 AAAA 1111 BBBB 2222 CCCC 3333 とあります。 上記を AAAA （空白） （空白） 1111 （空白） BBBB （空白） （空白） 2222 （空白） CCCC （空白） （空白） 3333 （空白） A列にB列を挿入し、2・3・5行目に空白のセルを入れていきたいのです。 9000行ぐらいあります。 他の列に A列、B列のものを取得していく形でも構いません。 とにかく、縦1列に並べたいです。 どなたか、ご教授お願い致します。
- ベストアンサー
- Visual Basic
- エクセル 3行ずつの合計
エクセルの質問です。 A列にID、B列に数値が入力されているとします。そしてC列にB列の2行ずつの合計を計算したいのですが、どうしたらいいでしょうか。 A ｜ B ｜ C 1 ｜ 25 ｜ ID1から3の合計 2 ｜ 24 ｜ ID4から6の合計 3 ｜ 37 ｜ ID7から9の合計 4 ｜ 32 ｜ ID10から12の合計 ・ ・ ・ 数百行はあるのでいちいちちょこちょこと合計するのが苦痛なんです。よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel VBA の構文を教えてください。
Excelにて、I列に分類条件が、”決", "D", "E*〇", E*△", 4種類あります。 （空白行もあり）計算済み数値がCP 列以降EO列まで記載されています。 セルCP2 (決+D+E*〇+E*△) 合計 セルCP5 (決+D) 合計 セルCP2 (決+D+E*△) 合計 JA2からJA18まで一旦、保存しています。 これをCP列からEO 列まで計算したいのですが、添付のようなVBAになってしまいました。 元データの加工によっては、行列が違ってくる事もあります。 VBA でシンプルに作成可能でしょうか？また、何となくExcel 関数でも簡単な方法がありましたら、 ご教授願います。（VBA初心者です）よろしくお願いします。 Sub 集計条件に一致した数値の合計() 'CP列 Range("JA2") = WorksheetFunction.SumIf(Range("I:I"), "決", Range("CP:CP")) Range("JB2") = WorksheetFunction.SumIf(Range("I:I"), "D", Range("CP:CP")) Range("JC2") = WorksheetFunction.SumIf(Range("I:I"), "E*○", Range("CP:CP")) Range("JD2") = WorksheetFunction.SumIf(Range("I:I"), "E*△", Range("CP:CP")) Range("CP2") = WorksheetFunction.Sum(Range("JA2:JD2")) Range("CP5") = WorksheetFunction.Sum(Range("JA2:JB2")) Range("CP6") = WorksheetFunction.Sum(Range("JA2:JC2")) 'CQ も同様に I列を検索して、 CQ列にある数値を一旦保存して、 CQ2 CQ5 CQ6 に結果を表示する
- 締切済み
- Visual Basic
- ESET Internet security17.0.15.0でのベースファイルの差分アップデート中にエラーが発生する問題について解決方法を教えてください。
- ESET Internet securityをカスタムモードでコンピューターの検査をした際に、「ベースファイルの差分アップデートの適用中にエラーが発生しました」というエラーメッセージが表示されました。このエラーの意味と対処方法について教えてください。
- ESET Internet securityでベースファイルの差分アップデート中にエラーが発生した場合、どのように対処すればいいのでしょうか？
補足
説明不足でした 最初は自分もピポットテーブル等で計算して出せばいいと思っていたのですが、最近エクセル取り込みデータが多くなり、ピポット編集作業が大変になってきまして。エクセル取り込み時に計算しておいた方が楽になるかなという思いで質問させていただきました。