No.1ベストアンサー
- 回答日時:
こんにちは。
maruru01です。Excel2000、VB6.0とします。
まず、VBのメニューの[プロジェクト]→[参照設定]で、
「Microsoft Excel X.X Object Library」(X.Xはバージョン)
にチェックを入れます。(Excelオブジェクトを使用出来るようにする。)
それで、例えばフォームに[Command1]コマンドボタンを貼り付けて、そのクリックイベントで、次のようにすれば出来ます。
なお、予めExcelファイルを用意しておいて下さい。
そのファイルの"Sheet1"のC4の書式設定を変更します。
Private Sub Command1_Click()
Dim xlApp As Excel.Application 'Excelアプリケーションオブジェクト
Dim xlBook As Workbook 'Workbookオブジェクト
Dim xlSheet As Worksheet 'Worksheetオブジェクト
Dim ExcelFileName As String 'Excelファイルのフルパス
ExcelFileName = "c:\Test.xls"
'Excelブックを開く
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open(ExcelFileName)
Set xlSheet = xlBook.Worksheets("Sheet1")
With xlSheet
.Range("C4").Select
Selection.NumberFormatLocal = "[h]:mm:ss"
End With
'Excelブックを閉じる
xlBook.Close True
xlApp.Quit
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing
End Sub
あとは、ファイル名やシート名、セルなどを適宜変更して下さい。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルについて教えてください。 1 2022/12/26 09:01
- Excel(エクセル) EXCELの書式設定を固定することはできませんか? 5 2023/06/20 17:05
- Excel(エクセル) Excelで、Excelの小テストで、中央揃えとかありますが、右クリックで、セルの書式設定から中央ぞ 3 2022/12/29 12:43
- Excel(エクセル) 至急 Excel日付表示設定教えてください Excelの日付表示ですが、他者から送られてくるExce 6 2023/02/03 11:01
- Visual Basic(VBA) Excel VBA 書式変更で困ってます。 オートフィルターの日付フィルターを用いて データの絞り込 2 2022/07/26 22:16
- Excel(エクセル) Excel VBA セルの書式設定 2 2022/03/30 10:48
- Excel(エクセル) コントロールにリンクするセルが選択されない 3 2022/06/12 14:37
- Excel(エクセル) エクセルの数式で教えてください。 3 2023/04/17 09:25
- Excel(エクセル) マイナス・パーセントの書式は 4 2023/08/02 21:45
- Excel(エクセル) Excelについて Excel初心者です。 日報に数字を入力する時、誤った数字を入れると、セルが赤く 6 2023/03/31 17:05
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
vb.netからエクセル関数書き込み
Visual Basic(VBA)
-
VB.NETで DataRow()を利用して、値からコードを取得したい。
Visual Basic(VBA)
-
.NET上でエクセル上に罫線を引く
Visual Basic(VBA)
-
-
4
VB.NET Excelを読み込んでDataTableに格納し、DBにデータをINSERTする
Microsoft ASP
-
5
VB.NETで、EXCELの右寄せ
Visual Basic(VBA)
-
6
VB2010でExcelの行をコピーして挿入する
Visual Basic(VBA)
-
7
VBからEXCELのセルの値を取得する方法
Visual Basic(VBA)
-
8
String"から型'Double'への変換は無効です。 とエラーが出ます。
Visual Basic(VBA)
-
9
vb.net EXCEL ウィンドウ枠の固定について
Excel(エクセル)
-
10
データセットのレコード更新がしたい
Visual Basic(VBA)
-
11
実数の整数部,小数部の取得
Visual Basic(VBA)
-
12
vb.netで画面のコントロールId名を変数で動的に制御し処理する方法
Visual Basic(VBA)
-
13
エクセルのセル最終行取得
Visual Basic(VBA)
-
14
エクセルへのデータの貼付時に書式が反映されない!
Visual Basic(VBA)
-
15
VB.NETの配列にExcelから読み込んできたデータを格納したい
Visual Basic(VBA)
-
16
VB.NETでのイベントの途中終了
Visual Basic(VBA)
-
17
DataGridViewで入力チェック後、フォーカスをあてたい
Visual Basic(VBA)
-
18
「タイプ初期化子が例外をスローしました」エラー何?
Visual Basic(VBA)
-
19
VB.NETで小数点以下の桁数を取得したい
その他(ソフトウェア)
-
20
VB.NETでEXCELファイルを開き、保存先をデフォルトで指定したい。
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
エクセルのVBAの標準モジュール...
-
「Columns("A:C")」の列文字を...
-
実行時エラー 3265「要求された...
-
VBAからPDFファイルにパスワー...
-
エクセルマクロエラー「'Cells'...
-
テキストボックス中の文字列の...
-
VBAで作成するメール(開封確認...
-
EXCEL VBA オートシェイプナン...
-
VBAで Set wb = Sheets(1).Cop...
-
PowerPointVBAでスライドマスタ...
-
VBAについてです。 初心者です...
-
[C#]static void 関数内でthis
-
ローカル変数を戻り値に使うと...
-
VBA:オートシェイプの線の長...
-
[VBA]CDOメッセージ送信エラー
-
ある文字列が全て数字であるか...
-
【VB】【エクセル操作】 SaveAs...
-
UserForm1.Showでエラーになり...
-
AccessVBAで「dim dbs as datab...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
worksheetFunctionクラスのVloo...
-
「Columns("A:C")」の列文字を...
-
エクセルのVBAの標準モジュール...
-
実行時エラー 3265「要求された...
-
VBAで既に開いている別アプリケ...
-
PowerPointVBAでスライドマスタ...
-
VBAで Set wb = Sheets(1).Cop...
-
エクセルマクロエラー「'Cells'...
-
ある文字列が全て数字であるか...
-
VBAについてです。 初心者です...
-
VBScriptでファイルの日時順(降...
-
Excelでフィルタをかけると警告...
-
VBAからPDFファイルにパスワー...
-
VBで引数にDictionaryオブジェ...
-
このように書くべきですか? { ...
-
EXCEL VBA オートシェイプナン...
-
テキストボックス中の文字列の...
-
エクセルVBAでcode128のバー...
-
[VBA]CDOメッセージ送信エラー
-
オブジェクトが見つかりません
おすすめ情報