ITmedia総合 >  質問!ITmedia  >  V

「VBA」最新質問一覧

Visual Basic for Applications

Visual Basic
VBAのマクロに詳しい方!!
初歩的なことですが、マクロ初心者なので教えて下さい。A,1に分類、B,1に商品名、C,1にH店の売上個数、D,1にK店の売上個数が入っている時、sheet1のB列の抜き出したいセルをマウスでドラッグすると、そこの行がコピーされ、sheet2にその行がペーストされる仕組みのマクロを...(2016/06/28)

Excel(エクセル)
Excel VBA 配列について
Excel VBA 配列について質問させてください。画像のようなコードですと、ケース1では問題なく動くのですが、ケース2になると「インデックスが有効範囲にありません」ケース3になると「型が一致しません」となります。セル範囲を配列に入れ、取り出す方法(ケース2)カンマ...(2016/06/24)

その他(プログラミング)
【VBA】配列の部分コピー
VBAにて、配列の範囲を指定して別の配列にコピーしたいと思っています。 現在は以下のようにFor文を使用して1つ1つ代入しているのですが、 もっと効率の良い方法はありますか? 処理速度を重視しています。 Dim srcArray As Variant: srcArray = Range("A1:A100"...(2016/06/23)

Visual Basic
EXCEL VBA 別シートへデータ集計
お世話になります。EXCEL VBAを使って下記のことを実現したいです。[やりたいこと][データ]シートに社員情報が4人分入っています。(本当は可変です)[データ]シートに"集計"というボタンを作ってクリックするとVBAが動いて[集計]というシートにデータを集計したい...(2016/06/22)

Excel(エクセル)
【VBA】if文中のinstrの条件2つ
 質問させていただきます。どうぞよろしくお願いいたします。環境:Excel2010でございます。 If InStr(.Cells(line, 10), "test1") > 0 And InStr(.Cells(line, 10), "test2") > 0 Then'(1)だとIf文の中に入ってきてくれる状況でございます。...(2016/06/21)

オフィス系ソフト
エクセルvba 検索対象をシートではなく、ブック全
このコードでシート内に検索文字があるかどうかを取得できるのですが検索対象をシートではなく、ブック全体にするにはどうすればいいでしょうか?Sub Sample()If Not Cells.Find(What:="test", LookAt:=xlPart) Is Nothing Then Debug.Print "あります&quo...(2016/06/20)

Visual Basic
vba引数の渡し方について
win32APIで作成したシステムを64bit環境でも動くよう修正をしています。win7、access2010以下のとおり宣言変更したところ、lpDevMode型が32bitの場合Long型、64bitはDEVMODE(構造体)となりました。この時、Private Const DEFAULT_VALUES = 0のところは64bit用にどのよう...(2016/06/20)

Excel(エクセル)
エクセルVBA実行方法
表記についてご教授宜しくお願いいたします。今は実行ボタンを作成してセルに数字を全て入力した後に実行ボタンをクリックして計算を完成させています。できればセルに入力の都度に例えばエンターキーを押したら実行のようにその都度計算が完成する方法を教えていただきたい。(2016/06/15)

オフィス系ソフト
ExcelからAccessのフォームを開くVBA
VBAをあまり理解出来ていない初心者です。ExcelからAccessのフォームを開く為に解説サイトを参考にしました。Accessはテーブルだけのバックエンドと、それ以外のフロントエンドに分かれています。Sub OPEN顧客管理番号検索() Dim objACCESS As Object Set objACCESS = Crea...(2016/06/14)

Excel(エクセル)
【VBA】On Error をつけても「Match
【VBA】On Error をつけても「Matchプロパティを取得できません」を回避できません。 今晩は、質問させていただきます。どうぞよろしくお願いいたします。環境:エクセル2010でございます。 下のようにコーディングしておりますが、「Matchプロパティを取得できません」...(2016/06/13)

Webデザイン・CSS
CSS navbar以外部分の100%
navbarの下からウィンドウの一番下までのheightのdivを作りたいです。html,body,divにheight:100%を設定するとnavbarのheightを含んでしまうため、下のほうがnavbar分飛び出てしまいます。どのように書けばよいでしょうか?(2016/06/11)

Visual Basic
VBAによる在庫管理について
Sheet1のA1セルからE1セルまで「品名」、「単価」、「単位」、「在庫数量」、「備考欄」が記入されております。10000品目の在庫管理に使用しております。Sheet2においてinputboxを使用し品名を入れるとSheet1のA1セルを起点とした表のA列「品名」から部分一致で検索し、検...(2016/06/08)

Excel(エクセル)
EXCEL VBA 別シートで検索後、貼り付け
excel2010(ブック名A.xlsx)にシート名SA、シート名SBがあります。シート名SAのC列に検索対象(C1?C50位)がありシート名SBのB列が検索範囲(流動的ですがB1?B100位の範囲)です。検索対象は文字列で、これが検索範囲のセルにに含まれていた場合検索範囲の隣のセルCxxに検索対象...(2016/06/07)

Excel(エクセル)
名前付きセルの利用方法 Excel2013 VBA
ExcelでVBAで設定値を書いたシートを参照する際に、Shell Worksheets("設定").Range("B1")と、書くのが見にくいので、名前付き参照で見やすくできないかと試してみたのですがうまくいきません。※名前付きセル範囲は手動で作って、"ブック"...(2016/06/06)

オフィス系ソフト
VBA
宜しくお願いします。お聞きしたいのですが、(言葉が合ってるのかも怪しいかも知れません)、VBAプログラミングについてなのですが、(1)最初に書く、sub ()とか最後のEnd sub?とか、こういうものとか、他のworksheetsとか、他、スペルは全部覚えなくてはならないのでしょう...(2016/06/02)

オフィス系ソフト
ひらがなとカタカナを区別して置換するには?VBA
カタカナの「ア」があるのなら置換したいのでSub test()Debug.Print Replace("ア111", "ア", "")End Subとしたのですが、これで問題なく置換されるのですがどうやらひらがなの「あ」も上記のコードで置換されるようです。Debug.Print Replac...(2016/06/01)

Visual Basic
エクセル VBAのオートフィルター実行時エラー
VBAのオートフィルター実行時エラーで「’rangeクラスのAutoFilterメッソドが失敗しました’」が表示されるのですが、エラーの内容がわかりません。教えて下さい。Sub 複数条件でのデータ抽出()Const OrigSheetName = "データベース" Const PasteSheetName = &qu...(2016/06/01)

Visual Basic
エクセル VBAのオートフィルター実行時エラー
エクセル VBAのオートフィルター実行時エラーについて教えて下さい VBAのオートフィルター実行時エラーで「’rangeクラスのAutoFilterメッソドが失敗しました’」が表示されるのですが、エラーの内容がわかりません。教えて下さい。Sub 複数条件でのデータ抽出()Const Orig...(2016/06/01)

Visual Basic
vbaについて。
お世話になっております。AccessVBAの初心者です。subプロシージャのボタンクリックイベントから共通モジュール(Public)の動作を呼び、変数の加減乗除の計算をさせたいです。共通モジュールの中をif文にする時、if「(subプロシージャの)ボタンが押された」時...(2016/06/01)

Excel(エクセル)
EXCEL VBAの重複行削除について
EXCEL2010を使用しています。添付画像の「重複行削除 前」の表を、RemoveDuplicatesで下の様にコードを組んでA列で重複する行を見て重複する行を削除しています。Public Sub 重複行削除() With WorkSheets(1)  .Range(.Cells(1, 1), .Cells(8, 3)).RemoveDuplicates _...(2016/05/30)

Visual Basic
VBA Do…Loopについて
お世話になっております。ただいま、アクセスVBAにてDo…Loopの練習をしております。テキストボックス1に数字を入れ、コマンドボタンを押すと入力した数字が1ずつ引かれる形でテキストボックス2に入るようにしたいです。(テキストボックス1に「8」→テキス...(2016/05/30)

オフィス系ソフト
excel VBAでテーブルを利用しようと考えてい
テーブル名は、「テーブル1」で、その金額欄が変更されたら、自動的にセルRange("金額_表紙")に読むために、式を次のように入力したいのですが、Range("金額_表紙").Formula = "=テーブル1[[#集計],[金額]]"実行時エラー'1004':アプリケーシ...(2016/05/27)

Excel(エクセル)
EXCEL VBA 複数シートを1シートまとめる
お世話になります。面談.xlsというブックがあります。このブックの中には一番左に[集計]というシートがあり、右隣から[個人別面談 田中],[個人別面談 山本],[個人別面談 高橋],という個人別のシートが複数あります。(可変です)やりたいこと(1)[集計]シートに[集計開始]とい...(2016/05/25)

オフィス系ソフト
OKwaveの管理をvbaで行なっているのですが
VBAで最終的に、カテゴリの「214/905/c906.html」を取得したいのですがどういうコードを作ればいいのでしょうか?Sub Sample()Dim mystr As Stringmystr = "<li><a href=""/c214.html"">ライフ</a>&nbsp;&gt;</li&g...(2016/05/22)

Visual Basic
VBAでtextファイルを作成
マクロ・VBA初心者です。ご教授お願いします!! 経費精算のExcelデータを画像のような「"",]で区切ったテキストファイルを作成するマクロを作りたいと考えてます。 完成イメージ:マクロのボタンを押すとテキストファイルの形でフォルダに作成される。もしくは...(2016/05/21)

オフィス系ソフト
Mac book airでExcel VBA
こんにちは。タイトルにある通り、Mac book airでExcel VBAの勉強をしたいのですが、出来るんでしょうか?WindowsかMacでExcelは少し使い勝手などが違うと聞きますが、実際はどうなのでしょう?詳しい方、教えてください。(2016/05/20)

オープンソース
EXCEL vbaで化け文字を検索
EXCELシートを、csvファイルにしてテキストエディタで開くと一部文字が「?」で表示されます。調べてみると"垂直タブ"(コード「0B」)が「?」で表示されました。その他にも色々とあります。テキストエディタで開いて、化ける文字がシート内に存在するか否か...(2016/05/20)

Excel(エクセル)
VBAチェックボックスについて教えて下さい。
EXCELのActiveXのチェックボックスを使用して、下記のようなことができるのか。また、できるのであれば、方法を教えていただければと思います。他の方法でこちらのほうが最適などあれば、教えていただければと思います。表の入力をする際添付のようにチェックボックスにチ...(2016/05/19)

Excel(エクセル)
エクセル VBAのチェックボックスについて
お読みくださり、ありがとうございます。エクセル初心者でございます。エクセルのマクロなのですが、お詳しい方、是非教えて欲しいです!汗調子に乗って入力フォームなるものを作りました。入力フォームの中にて、チェックボックスで「ある」「なし」の項目を入れてみたの...(2016/05/18)

Excel(エクセル)
iPadやAndroidでエクセルVBAを使用は?
iPadやAndroidで、エクセルVBA(マクロ)ファイルを使用できればと考えていのですが、例えばOffice365などで可能だったりするのでしょうか?これという情報が見つからなかったので、もし知っている方がいましたら教えていただければ幸いです。(2016/05/16)

オフィス系ソフト
エクセルVBAについて
例えばbook1のファイルをコピーしたらそのファイルは使えなくなるようにすることはできるのでしょうか?VBAでもかまわないので教えていただけないでしょうか?(2016/05/09)

Visual Basic
Access VBA について
お世話になっております。Access VBAを勉強しております。テキストボックスに漢字とひらがなしか入力できないようにするにはどうすれば良いでしょうか。Select Case等を使ってできないでしょうか。初心者のため初歩的な質問で恐縮ですが、ご教授お願いします。(2016/05/06)

Excel(エクセル)
エクセルVBA 現在のセルの4個上のセルの値
こんにちは、 エクセルマクロの質問です。イミディエイトウィンドウにて現在のセルの4個上の値を表示しようと以下の文を入力したところエラーになりました。?cells(activecell.row-4,activecell.colum).valueで 「実行時エラー 438オブジェクトはこのプロパティまた...(2016/04/30)

Excel(エクセル)
【エクセルマクロVBA】写真のスライドショーしたい
毎日100枚の写真が、ある特定のフォルダーに保存されます。これらは、一日経つと、自動で削除されます(バッチファイルで)これらの写真を、エクセルに取り込んで、簡単に閲覧できるようにしたいのです。写真を100枚挿入するマクロは書けるのですが、その挿入した写真を...(2016/04/26)

Visual Basic
access vba プロシージャの呼び出し
access vba についての質問です。フォームにテキストボックスが二つあるのに対して、オプションボタンが三つあります。(グループです)テキストボックス1に文字列を入力し、コマンドボタンを押すと選択されているオプションボタンのcaptionをテキストボックス1の文字列...(2016/04/25)

Visual Basic
Word 2016 VBA で保存できない
仕事で月次報告をするのですが、報告書が Word のファイルであり、ファイル名のパターンが決まっているため、VBA でファイル名を生成し、VBA のコードで指定したパスにファイル保存させたいと考えています。そこで、いろいろと調べて以下のコードを作ってみたのですが、保...(2016/04/21)

Visual Basic
VBA 任意のシートからコピーを始める。
教えてください。全てのシートをコピーして一つのシートにまとめるプログラムシートを作成しました。1番目のシートからコピーを始める場合はFor i = 2 To Worksheets.Count2番目のシートからコピーを始める場合はFor i = 3 To Worksheets.Countとすればよいのですがこれ...(2016/04/20)

Excel(エクセル)
Excel VBA コメントに関して
Excel2003を使用しています。VBAになるのかは定かではないのですがExcelの機能に「コメント」を付ける機能がありますよねセルに対してカーソルを合わすことで表示される黄色い枠のコメントのことをしるす。これをオートシェイプやコマンドボタン等のオブジェクトに対してカ...(2016/04/20)

Excel(エクセル)
実行時エラー’13’ 型が一致しません VBA
セルに以下の文字列が入っています。A1=10(451A2=452そしてVBAにて、以下のプログラムを実行すると、「実行時エラー’13’ 型が一致しません」というエラーになってしまいました。 原因はA1に「( 」があるので文字列だからだと思うのですが、「IF 条件文」が成立しないこ...(2016/04/20)

その他(プログラミング)
VBA 今日の日付に+1した場合、月末失敗する
VBA初心者の私ですが、いつも回答者さまに助けていただいております。今回も質問させてください。エクセル2002を使用しています。今日の日付に+1をして、翌日の日付を変数に入れたいのですが、月末の場合、失敗してしまいます。例えば、3月31日に+1をすると、3月32日にな...(2016/04/16)

オフィス系ソフト
VBA 複数の文字のコードを一気に返すには
Sub test1()Dim myStr As StringmyStr = "abc"Debug.Print Asc("a")Debug.Print Asc(myStr)End Subこのコードは、どちらも97が返るのですが、myStrは3文字です。3文字全ての文字コードを返すには、Sub test2()Dim myStr As StringmyStr = "abc&qu...(2016/04/14)

Visual Basic
エクセル VBA If?Then?Else
エクセルのA列に以下の文字列が入っています。A1A2=100-101A3=102-103A4=104-105A5=106-107A列の文字列を上から順に結合するため下記のVBAを実行しました。結合の条件として、文字列の最後の数字と次のセルの最初の数字が連続しているならば、互いに消去して結合、そうで...(2016/04/12)

Visual Basic
Excel VBA 非表示の最後のセルを取得
ExcelのVBAで最後のセル・行・列を取得しようとしているのですが、実際の最後(値や数式が入っている)のセルが非表示の列や行だった場合、期待する最後を取得できないでいます。取得しようとして試した方法は、以下の2つですが、いずれも非表示している直前の行...(2016/04/12)

Excel(エクセル)
VBA アクティブセルに対しての作業に関して
-質問内容-VBA作成2つ-ActiveCell.Offset(RowOffset:=[O1991], Columnoffset:=0).Activateアクティブセルを指定した段階でオフセット(縦下方向にO1991のセルに入れた数値分下に、ヨコに0)移動しアクティブセルにする-----------------------------------------------------...(2016/04/11)

Visual Basic
VBA アクティブセルに対しての作業に関して
-質問内容-VBA作成2つ-ActiveCell.Offset(RowOffset:=[O1991], Columnoffset:=0).Activateアクティブセルを指定した段階でオフセット(縦下方向にO1991のセルに入れた数値分下に、ヨコに0)移動しアクティブセルにする-----------------------------------------------------...(2016/04/11)

その他(プログラミング)
VBA 数日後の日付をうまく求められません
Windows7/Excel2002を使っています。エクセルVBAで、数日後の日付をうまく求められません。 例えば、31MAR.xls というエクセルファイルがあります。 (ファイルは、デイリーベースで存在します。)このファイル名の月と日にちを変数に入れます。DD = 日にち (例えば、3...(2016/04/10)

その他(プログラミング)
エクセルVBA 実行時エラー‘13’型が一致しまん
VBAは初級レベルです。説明が分かりづらかったらすみません。Windows7/Excel2002を使っています。エクセルVBAで、変数MMMと変数DDに処理する日付を入れたいのですが、 実行時エラーになってしまい、うまく変数が設定できません。 例えば、31MAR.xls というエクセルファイ...(2016/04/10)

システムエンジニアリング
エクセルVBA 実行時エラー‘13’型が一致しまん
VBAは初級レベルです。説明が分かりづらかったらすみません。Windows7/Excel2002を使っています。エクセルVBAで、変数MMMと変数DDに処理する日付を入れたいのですが、実行時エラーになってしまい、うまく変数が設定できません。例えば、31MAR.xls というエクセルファイル...(2016/04/10)

Excel(エクセル)
[VBA] リストから複数の2次元配列を作成する
こちらの識者の方々にはいつもお世話になっています。VBAの質問です。環境は下記になります。OS=windows7 pro 64bitOffice=Excel2010(14.0.7128.5000)・やりたいこと図のようなリストがあり、A/B/Cそれぞれのグループの2次元配列を作成したい。aryA(1,1) = "アケビ&qu...(2016/04/08)

Visual Basic
Excel VBAのマクロの記録について
Excelマクロの初心者です。マクロの記録のやり方の質問です。今あるフォルダの中にファイルA、Bがある状態でファイルAのマクロの記録で、ファイルBのコピーを同じフォルダーに作る操作を記録しようとしましたが、うまく記録できません。何かやり方が間違っているのでしょう...(2016/04/08)



7月29日で無料アップグレード期間が終了する、Microsoftの最新OS。とんでもないレベルで普及している自社の基幹製品を無料でアップグレードさせるというビジネス上の決断が、今後の同社の経営にどのような影響をもたらすのか、その行方にも興味が尽きない。

ドイツ政府が中心となって推進する「第四次産業革命」。製造業におけるインターネット活用、スマート化を志向するもので、Internet of Things、Industrial Internetなど名前はさまざまだが、各国で類似のビジョンの実現を目指した動きが活発化している。

資金繰りが差し迫る中、台湾の鴻海精密工業による買収で決着がついた。寂しい話ではあるが、リソースとして鴻海の生産能力・規模を得ることで、特にグローバルで今後どのような巻き返しがあるのか、明るい話題にも期待したい。