お世話になります。
いろいろ調べたのですが、答えを見つけられなかったので、質問させていただきます。
--環境--
OS Windows2000
VB 6.0
Office 2000
--目的--
Excelに貼り付けたOptionButtonチェックのON/OFFをVBから操作する。
関係ないことですが、OptionButtonを選択したときに出る
OptionButton1=EMBED("Forms.OptionButton.1","")
の意味も良くわかりません。
説明不足な点がありましたら、教えて下さい。
ヒントとなることでも結構ですので、宜しくお願いします。
No.2ベストアンサー
- 回答日時:
自力で解決できたんですか。
それは良かったですね☆>ついでに一つお聞きしたいのですが、VBからの操作で、Excelのセル縦幅を、セル内のデータに合わせる方法わかりますか?
>(セル内のデータが全て見える状態にするって意味です)
手でやる場合の、行と行の境でダブルクリックするの
と同じでいいですか?
マクロの記録では下のように出ました。
Rows("7:7").EntireRow.AutoFit
なので、
ws.Cells(消したい行番号,1).EntireRow.AutoFit
でいいと思います。
>オプションボタンをワークシートに貼り付け、オプションボタンを選択すると、上の式が表示される部分(呼び方知らなくてすみません)で出ました。
ホントだ。出ますね。数式みたいなものが。
試しにこの式を
「=A1」
と、上書きしてみたら、オプションボタンは無くなって四角いオブジェクトができ、セルA1の内容が表示される四角になりました。(意味が分からない文だ。)
一体何なのだろう・・?
すみません。回答じゃなくて(笑)
回答っぽい事を言うとすれば、
この数式を書くところは「数式バー」と呼びます。
この回答への補足
お早い回答ありがとうございます。
>>ついでに一つお聞きしたいのですが、VBからの操作で、Excelのセル縦幅を、セル内のデータに合わせる方法わかりますか?
についてですが、自分も昨日VBで、[ ws.Cells(消したい行番号,1).EntireRow.AutoFit ]みたいな感じで試してみたのですが、ダブルクリックだと、幅が一行目に合うようになってしまいます。
調べていてわかったことなのですが、セルを結合させていると出来ないかもしれません。
結合させていないセルに、[ 折り返して全体を表示する ]にチェックを入れておくと、自動で全体表示してくれました。
しかし、今回は仕様上、セル結合で考えなければならないんですよね・・・。
--------【ソース】---------
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open(App.Path & "\" & "test.xls")
Set xlSheet = xlBook.Worksheets(1)
~省略~
xlSheet.Cells(17, 22).Value = "長い文"
'入力データの幅にセルの幅を合わせる
xlApp.Cells(17, 22).EntireRow.AutoFit
--------------------------
もう一度調べてみます。
何かわかったら教えて下さい^^;
No.1
- 回答日時:
ワークシートに貼り付けたオプションボタンの事ですよね?
そのオプションボタンはワークシートの持ち物なので、
ws.OptionButton1.Value = True
とか
ws.OptionButton1.Value = False
で操作できましたよ。
(wsはオプションボタンを貼り付けたワークシート)
ところで、
OptionButton1=EMBED("Forms.OptionButton.1","")
ってどこに出るんですか?
この回答への補足
Excelで出ました。
オプションボタンをワークシートに貼り付け、オプションボタンを選択すると、上の式が表示される部分(呼び方知らなくてすみません)で出ました。
オプションボタンについては自力で解決出来ました^^;
pen pen pen さんと同じ方法でした。
ついでに一つお聞きしたいのですが、VBからの操作で、Excelのセル縦幅を、セル内のデータに合わせる方法わかりますか?
(セル内のデータが全て見える状態にするって意味です)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBでExcelの表形式の様なデザインを作りDBと連携させる。 4 2023/02/28 11:39
- CAD・DTP EXCELからAUTOCADに貼り付け 1 2022/04/20 17:42
- アルバイト・パート 自宅で出来る安心安全なアルバイトについて 5 2022/11/17 10:22
- Excel(エクセル) テキストの背後にあるオブジェクトとは 3 2023/01/03 20:22
- その他(Microsoft Office) Office(Windows版,Word/Excel/PowerPoint等)にログインできません 4 2022/07/24 15:18
- Windows 10 explorerをedgeで開く方法 2 2022/06/05 14:59
- 工学 電気回路について質問があります。 テブナン関連の問題なのですが、青線ないの意味がよくわかりません。な 4 2023/01/17 16:51
- Visual Basic(VBA) 九九の答えの計算 3 2022/12/20 22:13
- その他(プログラミング・Web制作) プログラムの勉強のおすすめは 7 2022/12/09 20:09
- Excel(エクセル) エクセルについて教えてください。 2 2023/06/14 11:11
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelの「0」だけ非表示、小数...
-
エクセルで1月0日と表示される!!
-
エクセルで条件に一致したセル...
-
複数シートの同じセル内容を1シ...
-
日付が未入力の際はゼロか、空...
-
エクセルで複写のように自動入...
-
Aというブックの1というシート...
-
Rangeメソッドは失敗しました。...
-
別シートのセルを絶対参照にする
-
(Excel)あるセルに文字を入力...
-
ExcelでTODAY関数を更新させな...
-
シート参照で変数を使いたい(EX...
-
Excelのファイル容量が減らない...
-
シートAで横に並んだ項目→シー...
-
エクセルのルビがついたセルを...
-
エクセルの文字
-
Excelで複数シートの選択セルを...
-
エクセルで、加筆修正したセル...
-
Excel 計算式の中で使っている...
-
【エクセル】文中に別シートの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelの「0」だけ非表示、小数...
-
日付が未入力の際はゼロか、空...
-
エクセルで条件に一致したセル...
-
エクセルで1月0日と表示される!!
-
(Excel)あるセルに文字を入力...
-
別シートのセルを絶対参照にする
-
Rangeメソッドは失敗しました。...
-
Excelシートの保護時にデータの...
-
複数シートの同じセル内容を1シ...
-
エクセルで、加筆修正したセル...
-
シート参照で変数を使いたい(EX...
-
エクセルで複写のように自動入...
-
Excelで複数シートの選択セルを...
-
INDIRECTを使わず excelで複数...
-
ExcelでTODAY関数を更新させな...
-
式の説明をお願いします。
-
excelでハイパーリンクになって...
-
エクセルのルビがついたセルを...
-
Excelでスクロールすると文字が...
-
エクセル ハイパーリンクで画像...
おすすめ情報