こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

visual basic6.0とエクセルのシートについて

はじめまして、こんにちは

タイトルの通り、VBとエクセルについてなのですが、
VBのコンボボックスを変化させると(1、2、3・・・のように)、エクセルのシート(すでにシート名は1から順に名前をつけました)も1、2、3・・・とかわり、そのシートのデータを表示させるようにしたいのですが、どのようなコードを書いたらよいか分かりません。

どなたか解る方がいらっしゃいましたら教えてください。よろしくおねがいします。

投稿日時 - 2004-05-30 14:58:54

QNo.875429

暇なときに回答ください

質問者が選んだベストアンサー

私はVBとVBAの連携について、生半可の知識しかありませんが、VBでフォームモジュールを解放し、標準モジュールに、下記を貼りつけて実行してみました。
下記では省略してますが、コンボボックをクリックした時の値をシート名として取って、shにセットしてみてください。sh = "TEST"の右辺です。
Sub main()
Dim xlApp1 As Object
Dim xlbk As Object
Dim xlsh As Object
sh = "TEST"
Set xlApp1 = CreateObject("Excel.Application")
xlApp1.Visible = True
Set xlbk = xlApp1.workbooks
xlbk.open ("c:\my documents\aa1.xls")
xlApp1.Worksheets("TEST").Cells(10, 1) = 999
xlApp1.Worksheets(sh).range("A1").Select
End Sub

投稿日時 - 2004-05-31 10:25:12

お礼

回答していただきありがとうございました。
また、お礼が遅くなり申し訳ありませんでした。

ご回答していただいた通りにしたら出来ました!

本当にありがとうございました。

投稿日時 - 2004-06-14 21:45:22

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問