• ベストアンサー

VBのラベルを説明コメント付きでエクセルへ

VB初心者です。 VBにあるラベルの数値または文字をエクセルに送り、送ったセルにカーソルをもって行くと数値または文字の説明が出るようにしたいのですが、、、 VBでは「TooltipText」を使いますよね。そのような動きをさせたいのです。 コードを書いていただくとありがたいです。よろしくお願いします。

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

  • ベストアンサー
  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.1

こんにちは。maruru01です。 Excelのコメントを使用してみてはどうですか。 これが、Tooltipみたいな動作をすると思います。(マウスポインタを当てると吹き出しが表示される。) このコメントの作成をマクロで記録すると、 Range("A1").Select Range("A1").AddComment Range("A1").Comment.Visible = False Range("A1").Comment.Text Text:="このセルの説明文" という感じになります。

denkiya10
質問者

お礼

ありがとうございます。早速試してみます。

関連するQ&A

  • エクセルのコメントの有無をVB上で取得する方法を教えてください。

    エクセルのいくつかのセルにコメントがつけてあります。そのコメントをVB上からさわったり,コメントによって動きを変えたりしたいのですが,コメントのないセルでコメントを参照しようとするとエラーが出るようです。エクセルのコメントの有無をVB上で取得する方法はどういうのでしょうか,どなたか教えてください。

  • VB Textboxの数字を判別する方法

    VisualVasic初心者です。下記のコードについて教えてください。 Textboxに数字を入力し、その数値によりラベルに表示される文字が変わるというプログラムを作りたいのですが、コードがわかりません。 Textboxに1と入力し、ボタンを押すとラベル1に「りんご」と表示される。 TextBoxに2と入力し、ボタンを押すとラベル2に「みかん」と表示される。 VB2005を使用しています。

  • VB2005 で立ち上がった状態のEXCELファイルからデータ読込みだけしたいのですが

    どなた様かお助けください。VB2005を勉強中の素人です。 既に立ち上げた状態のEXCELファイルから単純に特定セルの数値をVBのラベルに読み取りたいだけなのですが、ネットや書籍にてVBでのEXCEL読込み方法について調べたのですが、どこの情報をみても、EXCELの立ち上げとクローズがセットになっており、既にEXCELファイルを開いた状態からでは2重起動となり、読み込みだけの仕方が分かりません。一応下記でファイルのオープンからのクローズまでができるようですが、[open]のところを取り除くとエラーになってしまいます。 ファイル名とセルだけが私の指定したい条件なのですが、なにか単純な読み取り方法はないでしょうか? というか私がアホすぎるのも原因だとは思いますが、ちょっとEXCEL情報読み込ませたかっただけなのにもう2日も悩んでおり、こんなに難しいとは思いませんでした。VBって初心者向けとかいわれていますけど6.0やら.netやらと情報が分散していて何するにも一苦労ですね。  いろいろ調べて下記のコードで最低限読み込みはできるようになりました。(短いコードが好きなので宣言とかはかなり除去しているからかな?時々表示されるセルデータもおかしくなります) EXCELオブジェクトライブラリの参照は済です。 ファイルのオープンとクローズを除去し最終的には立ち上げっぱなしのEXCELから単純な読込み(のみ)を1秒に1回程度繰り返してラベル表示を随時更新するのが目的です。ご助言お願いします。 Dim xlApp As New Excel.Application Dim xlFilePath As String = "C:\あつし\sample.xls" label1.Text = xlApp.Workbooks.Open(xlFilePath).Worksheets.Item(1).Range("A3").Value() xlApp.Quit()

  • ボタンをポイントするとラベルに説明

    vb.netで質問です。 ボタンをポイントするとラベルに説明が出るようにしたいのですが、どのようにすればいいのでしょうか? 初心者なのでつまらない質問ですが、よろしくお願いいたします。

  • VBからエクセルへの書き込みについて

    xlSheet.Range("B24") =123 の様にするとエクセルのB4セルに123が書き込まれますが、エクセルのセルをマウスでダブルクリックしてセルにカーソルが表示されている状態にすると書き込みが停止します エクセルを操作してもVBの書き込みが停止しない方法は無いでしょうか ご存じの方恐れ入りますが宜しくお願いします

  • Excelのリストボックスにコメントは付けられないでしょうか

    同じような質問が他に出ていればそのNoをお教えいただいても結構なのですが・・・ Excelのリストボックスにカーソルが合わさるとセルにつけられるようなコメントが表示できないでしょうか リストボックスを大きくは作れない事情からリストボックスにカーソルが合わさった時に選択の補足説明が出来ないものかと考えております コメントではなくほかの代替機能でも良いのですがどなたかご教示を願います 因みにVBはわかりません。

  • VB6.0でのエクセルのセルのクリア

    VB6.0でのエクセルのセルのクリア VB6.0でエクセルからCSVファイルを作成しています。 それ自体はできているのですが、CSVファイルを作成後に 元のエクセルのセルをクリアしたいと思っております。 5行目以降のB・C・D・Eの列に入っている値(すべて数値が 入っています)をBに数値が入っている行までクリアしたいとい うのが希望です。 どういう構文で実行すればよいか、アドバイスいただければ 幸いです。宜しくお願い致します。

  • VBからExcelのデータを参照するには?

    VBからExcelのデータを参照するには? ExcelのA列を、参照しようとしています。 このA列には数字も混じっています。 例えば A123 abc 456 qwer のように、4行あったとします。 VBのソースコードは、次の通り --------------------- Dim elSequence(10) As String i = 0 Do Until objSheet.Range("a2").Offset(i,0).Value = "" elSequence(i) = objSheet.Range("a2").Offset(i,0).Value i += 1 Loop --------------------- 問題は、Excelのセルに「数字だけの場合(上記の例で4行目)」で、VBはこれを、文字列として扱わずにDouble型と認識してしまいます。 例え、Excelのセルを、プロパティの文字列指定としても「456」はDouble型になってしまいます。 Excelから受け取ったデータを、文字列への変換はどのようにしたら良いですか。 参考になりそうなWeb等でも構いませんので、教えていただけませんか。

  • VB2008でEXCELのセルデータが読めません

    VB2008でEXCELを開き、セルの内容を読み込もうとしましたが読み込めません。 EXCELのオープンとセルの読み込みは下記により行いました。 Dim strExcelFile As String 'エクセルファイル Dim xlApp As Excel.Application       Dim strExcelData As String xlApp = CreateObject("Excel.Application") xlApp.Workbooks.Open(Filename:=strExcelFile) xlApp.Visible = True 'EXCELは表示されている strExcelData = xlApp.Cells(3,4).ToString EXCELの3列4行には数値が入っていますが、strExcelDataには"System._ ComObject"というデータが読み込まれています。 ToStringは、これをつけないとデータの型が違うとエラーになります。 EXCELのデータは文字型と思っていましたがこれも判りません。 VBのMicrosoft Excel9.0Object LibraryをクリックしてOKしています。 原因の見当が皆目つかず困っています。

  • VB2008 Excelにデータ出力

    VB2008で、Timerで更新されるTextBoxの数値をExcelに順次出力する(セルA1に出力したら、次の値をA2に出力、・・・)プログラムを作りたいのですが、どんなソースにすればよいか分かりません。 Web検索もしましたが、キーワードが悪かったのか、適したサンプルも見つかりませんでした。 VB Form上のTimerでTextBoxの数値を更新する部分はできていますので、指定のフォルダ内のExcelを開いてデータをセルに出力する方法を教えてください。 参考URLなどもあれば教えてください

専門家に質問してみよう