- ベストアンサー
ExcelVBAマクロでの変数の宣言エラーについて
sample_の回答
- sample_
- ベストアンサー率76% (20/26)
Sub SampleCode() Dim wdObj As Object Set wdObj = CreateObject("Word.Application") 'ヽ(´ー｀)ノここに何か書いて。 Set wdObj = Nothing End Sub Newが使えるには、ExcelVBAとしてもともと備わっている場合か 参照設定で適切なものにチェックが入っている場合利用することが可能になるのですが・・・ そんなことせずに、CreateObjectで生成してしまうのでよいと思います。
関連するQ&A
- ＶＢでの変数宣言は１行に２つできないのですか？
Ｖｉｓｕａｌ ＢＡＳＩＣで変数宣言は１行に２つ以上記述しても実際、動作します。 例 ＤＩＭ Ａ、Ｂ ａｓ Ｉｎｔｅｇｅｒ このように宣言すると、ＡもＢも整数となります。 しかし、このように宣言して、この変数を Ｃａｌｌ サブプログラム名（Ｂ） のように、パラメ－タとして引き渡そうとするとエラーとなってしまうようです。 よくわからないまま、 ＤＩＭ Ａ ａｓ Ｉｎｔｅｇｅｒ ＤＩＭ Ｂ ａｓ Ｉｎｔｅｇｅｒ と分けて記述したらエラーがきえたようです。 変数宣言は１行に２つ以上まとめて記述してはいけないのでしょうか？ ＶＢは Ｖｅｒ ５ です。
- ベストアンサー
- その他(ソフトウェア)
- EXCEL2007で動くマクロがEXCEL2000だとエラーが出ます。
下記は、wordの「@一覧表」文字の部分をExcelで作成した表(B3:E9)に置き換えるEXCEL2007で作成したマクロですが、EXCEL2000で動かすと「メソッドまたはデータメンバーが見つかりません」のエラーが出ます。初心者につき、対処方法を教えて下さい。 Dim wordApp As Word.Application Dim wordDoc As Word.Document Dim wordRange As Word.Range Set wordApp = New Word.Application Set wordDoc = wordApp.Documents.Open(ThisWorkbook.Path & "\ひな型用ドキュメント.docx") (途中略) Set wordRange = wordDoc.Content wordRange.Find.Execute "@一覧表", Forward:=True Range("B3:E9").Copy wordRange.PasteAndFormat (Word.wdPasteDefault) ←エラー *エラーは、wdPasteDefaultで出ます。
- ベストアンサー
- Visual Basic
- エクセルマクロ
エクセルマクロ実行すると ユーザー定義型は定義されてませんとのエラー表示が。。。 Dim myCon As New ADODB.Connection どういうこと？
- 締切済み
- Visual Basic
- マクロがエラーになります
下記のようなマクロ使いたいのですがエラーになり 動作しません 実行時エラー'1004': アプリケーション定義またはオブジェクト定義エラー のエラーになりますどのように直せばよいのでしょうか？ よろしくお願いします。 Sub test() Dim ReturnMessage As VbMsgBoxResult ReturnMessage = MsgBox("VBEを閉じますか？", vbYesNo, "確認") If ReturnMessage = vbYes Then Application.VBE.MainWindow.Visible = False End If End Sub
- ベストアンサー
- Windows 7
- ワードのマクロからエクセルシートを開きデータを読み込む
ワードマクロからエクセルシートのデータを読み込みたいのですが、マクロを実行すると「コンパイルエラー：変数が定義されていません。」というエラーが出てしまいます。変数xlUpで引っかかってるようなんですが、どのように定義すればよいですか？ コードは以下です。 Dim Workbooks As Object Dim ecell As Integer Workbooks.Open FileName:="namesheet.xls" ecell = Workbooks("namesheet.xls").Worksheets(1).Range("B100").End(xlUp).Row よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- 変数の宣言について
VBですけれども 変数の宣言なしに For i ・ ・ ・ Next i などを記述しますと「変数の宣言がされていません」 というメッセージがでるのですが、テキストなどでは 変数の宣言などしていなくとも動作しますこれはどうして どういうことなのかご存知の方教えてください。 Dimとかの宣言もなしにです。 著書は 独習Visual Basic 6.0 などです。
- ベストアンサー
- Visual Basic
- ExcelVBAマクロについて確認させてください。
ExcelVBAマクロについて確認させてください。 Wordファイルを開いて変数に保存するプログラムを作成したいのですが、下記の「With .Documents.Open(sFullPath)」のところで”型が一致しません。”と表示され、うまくいきません。 この原因は何か考えられるのでしょうか。 回避策をお教えいただければと思います。 Dim sFullPath As Variant Dim moji As String sFullPath = "C:\ドキュメント\test\AAAAA.docx" With CreateObject("Word.Application") With .Documents.Open(sFullPath) moji = .Content.Text .Close End With .Quit End With
- ベストアンサー
- Visual Basic
- Excel にて変数の宣言の仕方
Excel2002を使用しています。 標準モジュール内で下記のように変数を宣言すると Dim i,k as long （例）kには、あるセルの値を取得します。10000 Keta=len(k) この結果、ketaには、「4」という結果になります。 10000なので、「5」が返らないといけないのですが、うまくいきません。 ところが、 Dim i ,k ,m as long このように変数kの後ろに他の変数（今回はm）を記載すると、 「5」という結果が返ってきます。 変数の宣言の仕方が間違っているのでしょうか？ よろしくお願いいたします。 ちなみに、 Dim k as long としても、「4」の結果が返ってきました。 同じ行に他の記載をしないとうまくいかないようです。。。
- ベストアンサー
- オフィス系ソフト
お礼
返事が遅くなり、申し訳ございません。 CreateObjectで生成する方法もあったんですね。 再度見直しをしてみます。 色々とありがとうございました。