Sub

タイマーがうまく動かない

…VB6.0（SP5）で、バッチファイルを実行後、5秒待つようにしたいのですが、うまく動きません。 Dim ping_count As Long Private Sub Command1_Click() Shell ("executeping.bat") Timer1.Interval = 1000 Timer1....…

• 2004/05/31 20:13
• Visual Basic（VBA）
• 回答数(2)

VB6 Form内のDragDrop

…VB6でForm内にCommandButtonがいくつか有ります。 各CommandButtonはClickするとShellオブジェクトでファイルを開く様になっています。 やりたいことは 2つのCommandButton間をDragDrop？によりCaptionを入れ替...…

• 2014/07/24 14:12
• Visual Basic（VBA）
• 回答数(1)

アクセス　実行時エラー3265

…お世話になっております。 先ほどまで、違うスレで質問していたものです。 おかげさまで、Private Sub scdSelect()のようなコードとなり、 こちらの方は無事動作しましたが、それをコピーして...…

• 2013/08/24 23:32
• その他（プログラミング・Web制作）
• 回答数(2)

【マクロ】１つのセルから結合されているセルへのコピー貼り付けについて

…表題の件、やり方ご存じの方、教えて下さい A1セルのデータを、結合された A2:E2へ 値はりつけしたいです。 下記コードで実行するとエラーになります 【コード】 Sub マクロ() ...…

• 2024/01/28 21:30
• Excel（エクセル）
• 回答数(4)

PDFファイルをコピーしてエクセルブックにはりつけるVBA

…PDFファイルをコピーしてエクセルブックにはりつけるVBAをかきました。 これをフォルダ内にあるすべてのPDFを順にエクセルブックに張り付けるやり方を おしえていただけないでしょうか。...…

• 2016/03/17 17:29
• Excel（エクセル）
• 回答数(5)

EXCELで保存済みにしたい

…EXCELのマクロである処理をするプログラムを作っています。 その中でVBAでListBoxに項目を動的に追加しています。 ListBoxに項目を追加すると終了時、 「ListBox.xlsへの変更を保存しますか？」...…

• 2011/12/15 18:35
• Visual Basic（VBA）
• 回答数(1)

Access　フォームでの並べ替え　OrderBy

…いつもお世話になっています。 フォームで「製品ID」が昇順に並べ替えられるよう下記のイベントを 設定しましたが、上手くいきません。 Private Sub Form_Open(Cancel As Integer) Me.OrderBy = "製品I...…

• 2011/05/13 23:53
• その他（データベース）
• 回答数(1)

フリーズしてしまいます。

…アクセスでWebBrowserコントロールを使ってIE操作をしているのですが フリーズしてしまいます。 フォームに、WebBrowser0を配置して、 ---------------------------------- Private Sub Form_Load() Me.WebBrowser0.Navig...…

• 2012/12/01 23:21
• Visual Basic（VBA）
• 回答数(2)

エクセルでメッセージボックスにパスワードを入力し、ブックの保護を解除するマクロを教え...

…ブックを保護するマクロと、解除するマクロをそれぞれパスワード付きで作り、ボタンに設定しました。 Sub ブック保護() 　　ThisWorkbook.Protect Password:="1234" End Sub Sub ブック保護解除() 　...…

• 2016/06/07 16:44
• Excel（エクセル）
• 回答数(6)

トグルボタンの文字色

…windows-xp、アクセス2003、を使っています。 フォームに複数のトグルボタンを置き、下記コードをつけました。 そこで質問です。 「トグルボタンがＯＮの時は赤色、ＯＦＦの時は黒色に...…

• 2005/05/11 10:44
• その他（プログラミング・Web制作）
• 回答数(1)

VBAでユーザーに別ファイルのシートを選ばせたい場合

…エクセル２０００です。 マクロを記載したBOOKを開いたままで、ユーザーに作業の対象とするファイルを開かせ、その中の対象とするファイルを選ばせたら次のマクロに移りたいのですが、...…

• 2009/08/20 16:49
• その他（Microsoft Office）
• 回答数(9)

Excel VBA 違うxlsファイルの指定したシートを開く処理

…Excel VBAで違うExcelファイルの指定したシートを開きたいのですが、 うまくいきません。現在のコードは、 ＊フォーム＊ Private Sub CB1_Click() Dim A As Integer A = MsgBox("データ展開する？", 4, "...…

• 2008/05/08 11:08
• Excel（エクセル）
• 回答数(2)

ユーザーフォームで別シートを検索できますか

…現在エクセルのユーザーフォームを勉強中です。職員データとメモの二つのシートがあります。職員データシート上で職員コード番号で検索し検索画面を閉じるとデータを表示するユーザー...…

• 2014/09/19 16:39
• Excel（エクセル）
• 回答数(3)

VBScriptで未入力のチェック（クライアントサイド）

…ある程度の入力チェックをIEにて行わせたいのですが 入力チェックをして「OK」ボタンをクリックしても 次ページへ移動してしまいます。 メッセージを表示させて未入力の欄にフォーカス...…

• 2001/11/29 16:15
• Microsoft ASP
• 回答数(2)

配列を関数に渡す方法

…VB6.0のプログラムで質問があるのですが 下のプログラムのように配列num、num1を関数AAAに 渡したいと思うのですがどうすればいいのでしょうか？ よろしくお願いいたします。 Option Explicit...…

• 2009/04/12 19:09
• Visual Basic（VBA）
• 回答数(6)

コンボボックス or リストボックス　（複数列表示→値の取得）

…マクロ初心者です。（エクセル2003使用-ユーザーフォーム） 先日はお世話になり、ありがとうございました。 作成していくうちにさらに改良を加えたく、再質問させていただきます。 ※...…

• 2009/08/23 00:37
• Visual Basic（VBA）
• 回答数(2)

エクセルVBAで

…全シート保護（保護の解除）のコードなんですが、パスワードを求めない形にするには下記をどうすれば良いのですか？ Sub 全シート保護の設定() Dim Sh As Worksheet x = Application.InputBox("パス...…

• 2005/06/28 11:53
• Visual Basic（VBA）
• 回答数(5)

VBA:カウンターの i の値が開放されなくて困っています。

…以下のコードを実行する度に、カウンター i の値がリセット（開放）されずに積算されて困っています。なぜか教えて下さい。宜しくお願い致します。 以下のコードは、簡単に言えばcsvフ...…

• 2006/01/14 03:25
• Visual Basic（VBA）
• 回答数(6)

【HTML、VBScript】HTAでのイベントハンドラの内容を変更するには？

…こんばんは 下記内容はHTAアプリケーションにおいて、button1をクリックすると、1回目はSample1プロシージャが発動をし、２回目以降はSample2プロシージャが発動することを期待したコードに...…

• 2016/01/31 20:42
• Visual Basic（VBA）
• 回答数(1)

数値かどうかを取得したい　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 M...…

• 2014/07/06 21:33
• Excel（エクセル）
• 回答数(3)