エクセルの学校：全文検索：Hyper Estraier：リンク

Results of 1 - 1 of about 6617 for リンク (0.004 sec.)

[[20110302225514]]: #score: 3108; @digest: 45ba0657a9ec3531e77c9e1cd298f14b; @id: 53578; @mdate: 2011-03-03T13:59:08Z; @size: 3461; @type: text/plain; #keywords: スn (30483), 記n (26707), 全チ (11368), クボ (11015), ク設 (9696), 横as (7005), 隔as (6721), 縦as (6235), 七十 (6198), gray (4893), ク上 (4288), checkboxes (3509), linkedcell (3136), ボッ (2976), チェ (2924), ぴー (2683), ェッ (2648), クス (2390), 一発 (2301), リン (2267), checkbox (2265), ンク (2227), ック (1995), 数個 (1983), obj (1921), 、28 (1871), 足説 (1785), 始行 (1677), ーこ (1576), 記1 (1557), 発で (1278), 間隔 (1164); 『エクセル2007 のチェックボックスのリンク」設定について』（おすぎさん）
エクセル2007 のチェックボックスのリンク」設定についての質問です。作成したチェックボックスの下のセルにリンクを設定をしたいのですが、チェックボックスの数が数個くらいなら1個ずつリンク設定で余り時間も要せずにできますが、数十個のチェックボックスのリンク設定をする必要がある場合、一度に、全チェックボックスのリンク設定する方法があれば、教えてください。使用OS はVISTA 、使用エクセルは2007 です。』（おすぎさん） ------------------------------------ [[20110302225514]]質問の補足説明です。質問の書き方が不十分でしたので補足致します。行\列 A - - - - - - - B - - - - - - - N 1 2 チェックボックス1 チェックボックス2 - - -チェックボックスn 3 上記 1のリンク 上記 2のリンク 上記 nのリンク 4 5 チェックボックスn+1 チェックボックスn+2 - - -チェックボックスn+n 6 上記n+1のリンク 上記n+2のリンク 上記n+nのリンク 7 上記のようにチェックボックスをn+n 個作成し、それぞれのチェックボックスの下のセルにその結果のTrue、または、False を返すリンクを設定をしたいのです。 VBAを使用すれば、1個づつリンク設定する手間が省けて、一発で、できるのではと言ってくれる人もありましたが、 VBAに関しましては詳しく知りませんので、どんな式を使用すればよいかについて教えて頂けませんでしょうか。よろしくお願い致します。 (おすぎさん) ---- Sub ぴーこさん() Const 開始行 As Long = 2 Const 間隔 As Long = 3 Const 横 As Long = 14 Const 縦 As Long = 2 Dim obj As CheckBox, i As Long For i = 1 To 横 * 縦 With ActiveSheet.Cells(((i - 1) ¥ 横) * 間隔 + 開始行, (i - 1) Mod 横 + 1) Set obj = ActiveSheet.CheckBoxes.Add(.Left, .Top, .Width, .Height) obj.Caption = "チェック " & i obj.LinkedCell = .Offset(1).Address End With Next i End Sub (Gray) ---- ぴーこさん回答ありがとうございます。ご提示のプログラムを実行すると、28個の新たなチェックボックスが一発で作成され、驚いています。も少し知りたいと思っています質問点は、この作成された28個のそれぞれのチェックボックスの下のセルにチェックボックスの結果を表示するようにリンクを張りたいのです。ひとつずつ個別にリンク設定していけばできるのですが、何とか、28個分が一発でできる方法はないものでしょうか。よろしくお願いします。 ---- ぴーこさん、先のコメント失礼しました。 リンクは設定されていました。申し訳ありません。質問の仕方が悪かったので訂正致します。ご回答頂いたプログラムはチェックボックスを作成するセルが指定されているようにうかがえました。シートの任意の箇所に（いろんな場所に）複数個のチェックボックスをまず配置しておき、そのあと、配置した全チェックボックスの下のセルに リンク設定を一発でできるようにすることは可能なのでしょうか。もし、できましたら、お教え願いたいと思います。（おすぎさん） ---- 応用でChekBoxをループすれば・・・ Sub 名前はGrayなんですが() Dim obj As CheckBox, i As Long For Each obj In ActiveSheet.CheckBoxes obj.LinkedCell = obj.TopLeftCell.Offset(1).Address Next End Sub (Gray) ---- 目から鱗が取れたような思いです。 Gray さん、ほんとにありがとうございました。（Sub の名前が「ぴーこ」さんでしたので、失礼しました。）七十の手習いで、最近、こんなに感激したことはありませんでした。また、わからない点が出てきましたら、ご教示よろしくお願いします。（おすぎさん） ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/201103/20110302225514.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ