- ベストアンサー
本当に基本的なことなんですが
エクセルVBAでモジュールを使おうと思っています。 以下のようにモジュールにコードを書き、実行したらコンパイルエラー End Subが必要ですとメッセージがでてしまいます。 どこをどう直せばいいんでしょうか？ 変数を宣言しているだけだと思うんですが。 Sub Macro1() ' ' Macro1 Macro ' マクロ記録日 : 2002/10/29 ユーザー名 : ' Sub Main() Public BaseCell As CellFormat Public BaseCellRow, BaseCellColumn As String End Sub End Sub 暇な時でいいですから、回答お願いします。
- hibachi
- お礼率31% (27/85)
- Visual Basic
- 回答数4
- ありがとう数2
- みんなの回答 （4）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (3)
- imogasi
- ベストアンサー率27% (4737/17068)
（１）Publicの宣言は、宣言セクションにしないといけないのでは。 「モジュール レベル変数をほかのモジュールでも利用できるようにするには、モジュールの宣言セクションで Public キーワードを使って "パブリック変数" を宣言します。パブリック変数の値は、アプリケーションのすべてのプロシージャで利用できます。 （２）ＣｅｌｌＦｏｒｍａｔはエクセル２００２からできた機能のようで、エクセルのVersionを銘記すべきである。 （３）Ｍａｉｎ（）という名をつけるのは勝手だが、Ｊａｖａなどのように、コントロール（制御）がここに初めに 来るという保証は無いのはご存知ですよね。
お礼
すばやい回答ありがとうございます。 VBA、VBはまったくの初心者であるためモジュールの使い方とかよくわかっていませんでした。もう少し勉強したほうがよさそうですね。 (2)エクセルのバージョンはご指摘のとおりエクセル2002でした。
補足
もう少し質問させて下さい。私の持っているマニュアルによると、「スタートアッププロシージャとして定義するSub Main」と書いてあります。なので私はMainはC言語におけるMainのようなものだと思っていました。これは間違っていますか？
- taknt
- ベストアンサー率19% (1556/7783)
- taknt
- ベストアンサー率19% (1556/7783)
マクロのなかにマクロは できません。 Sub Macro1() End Sub Sub Main() Public BaseCell As CellFormat Public BaseCellRow, BaseCellColumn As String End Sub とすれば、いいでしょう。 って、外側のマクロは 何をやってるのかな？
補足
すばやいレスありがとうございます。 >って、外側のマクロは 何をやってるのかな？ 実はこのあとSub Main内でUserForm1とUserForm2を表示させようとしています。この際Sub Macro1内ではすることがないんですが、そういうやり方って正しいですか？あるいは書き方としておかしいでしょうか？
関連するQ&A
- VBAの移行
エクセルからリブレに移行するにあたり、 エクセルで機能していたVBAコード： Function BeepMe() As String Beep BeepMe = "" End Function を Option VBASupport 1 REM BASIC Sub Main Function BeepMe() As String Beep BeepMe = "" End Function Sub Macro1 End Sub と書き換えました。 でもこれではエラーになってしまいます。 詳しい方、教えてください。
- 締切済み
- Excel（エクセル）
- ｖｂａの 変数の宣言 記号は使えない？
ｖｂａの 変数の宣言 記号は使えない？ Sub test1() dim st @ End Sub みたいに変数の型を As String ではなく記号で表現ってできないんでしたっけ？ エラーになってしまいます。
- ベストアンサー
- オフィス系ソフト
- 数値かどうかを取得したい IsNumberではダメ
Sub Macro2() Dim mystr As String mystr = "1" If IsDate(mystr) = False Then MsgBox "NO" End If End Sub これなら日付型かどうかを取得できるのに、 Sub Macro1() Dim mystr As String mystr = "1" If IsNumber(mystr) = False Then MsgBox "NO" End If End Sub だと、IsNumberがコンパイルエラーになります。 変数に入っている値が数値として評価できるかを取得する方法を教えてください。
- ベストアンサー
- オフィス系ソフト
- 記号をマクロで記録することは不可能か？
記号をマクロで記録することは不可能か？ エクセル２００３を使用しています。 マクロの記録→挿入→記号と特殊文字で ハートを挿入し、マクロの記録の終了をして標準モジュールを見たのですが Sub Macro1() ActiveCell.FormulaR1C1 = "?" Range("a1").Select End Sub となります。 セルにはハートが入っています。 そのあと、Macro1を実行すると、?がセルに挿入されました。 ＶＢＡで記号を挿入することは不可能のなのでしょうか？
- ベストアンサー
- オフィス系ソフト
- 参照渡しをする時は、渡される側は違う変数を使う？
参照渡しをする時は、渡される側は違う変数を使うべきなのでしょうか？ ＶＢＡのお勉強をしているのですが Sub test1() Dim mystr As String mystr = "a" Call test2(mystr) Call test3(mystr) End Sub Sub test2(ByRef mystr As String) MsgBox mystr End Sub Sub test3(ByRef mystr2 As String) MsgBox mystr2 End Sub この場合、test2とtest3ではどちらを使ったほうがいいのでしょうか？ test3は、mystr2 というmystrとは違う変数を使っていますが、 test2は、test1のmystrと同じ変数を使っています。 test1と同じ変数を使おうが違う変数を使おうが どちらにしろ (ByRef 変数名 As String) で宣言するから、変わらないのでしょうか？
- ベストアンサー
- オフィス系ソフト
- 実際に宣言した変数を使ってない場合
ｖｂａです。 標準モジュール内で Public str tmp As String 等で宣言しているのに、 実際に宣言した変数を使ってない場合があるのですが それを見つけ出すことはできますか？ 宣言だけしていて使ってない変数が知りたいです。 ひとつずつ検索していくしかないのでしょうか？
- ベストアンサー
- その他MS Office製品
- マクロの記録で何も記録できない理由は？
「ブックを開く」という動作が知りたかったので、 現在開いているブック1から、マクロの記録ボタンを押し、 デスクトップにあるブック2をダブルクリックして開きました。 しかし記録終了ボタンを押した後、 ブック1の標準モジュールを確認しても Sub Macro1() ' ' Macro1 Macro ' マクロ記録日 : 2009/10/16 ユーザー名 : ' End Sub と何も記録できていません。 何故でしょう？ ちなみにブックを開く方法は http://officetanaka.net/excel/vba/file/file01.htm で確認できました。 なのでマクロの記録で記載されない理由を教えてください。 エクセル2003です。
- ベストアンサー
- オフィス系ソフト
- 定数の宣言ってdimは使えないのですか？
ＶＢＡです。 標準モジュールに Option Explicit Public Const フォルダ名 As String = "新しいフォルダー" Sub aaaa() End Sub はできるのですが、 Option Explicit dim Const フォルダ名 As String = "新しいフォルダー" Sub aaaa() End Sub は、エラーになってしまいます。 Option Explicit Sub aaaa() dim Const フォルダ名 As String = "新しいフォルダー" End Sub もダメみたいです。 定数を使うときは、必ずPublicで宣言しなけらばいけないのでしょうか？
- ベストアンサー
- オフィス系ソフト
- 同じマクロ名でも、違うモジュールならエラーにならな
同じマクロ名でも、違うモジュールならエラーにならない？ エクセルＶＢＡについてご教授ください。 標準モジュールに ――――――――― Option Explicit Sub CommandButton1_Click() MsgBox "" End Sub Sub CommandButton1_Click() MsgBox "" End Sub ――――――――― と同じマクロ名を2つ作ったら、コンパイルエラーになりますが、 上記のコードは一度消して、フォームモジュールに ――――――――― Private Sub CommandButton1_Click() MsgBox "" End Sub ――――――――― を一つ作り、 標準モジュールに ――――――――― Sub CommandButton1_Click() MsgBox "" End Sub ――――――――― を一つ作った場合は、エラーにならずにマクロを実行できました。 これは、フォームモジュールがPrivate Subだからでしょうか？ フォームモジュールに１つ、 標準モジュールに１つ なら同じマクロ名を使っても、エラーにならないという事でしょうか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- 標準モジュールにpublicで宣言するしかない？
フォームモジュールと標準モジュールで同じ変数を使って値を行き来したい場合、 標準モジュールにpublicで宣言するしかないのでしょうか？ 【フォームモジュール】 Private Sub cmd_コマンド0_Click() test = "aaa" Call 標準モジュールtest End Sub 【標準モジュール】 Public test As String Sub 標準モジュールtest() MsgBox test End Sub でいいのですか？
- ベストアンサー
- オフィス系ソフト
お礼
回答ありがとうございます。 私のみたのはVisual Basicのマニュアルだったので、ちょっと意味が違っていたかもしれないですね。CにおけるMain＝Excel自身という解釈了解しました。わかりやすい説明ありがとうございました。