• ベストアンサー

結合セルに名前をつけてマクロで取得は不可?

お世話になります。 エクセル2000です。 セルを結合してそこに例えば 「DenDate」と名前をつけてマクロで ためしにMsgBox Target.Name.Nameと 書くと名前がついていないとみなされる みたいなのですが、やはり結合セルに 名前をつけたものは駄目なのでしょうか? それともやり方が拙いのでしょうか? 宜しくお願いします。

noname#127172
noname#127172

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

  • ベストアンサー
  • redfox63
  • ベストアンサー率71% (1325/1856)
回答No.1

結合する前にそのセル範囲に名前をつければ大丈夫だと思います 名前を定義するときの参照範囲が結合しているセルの場合左上のセルのみになるのが原因のように思います 左上のセルだけに名前が定義されたものが Target.Cells(1,1).Name.Name で取得可能です

noname#127172
質問者

お礼

できました! 有難うございました。 大変助かりました。

関連するQ&A

  • 結合セルの名前取得(ワークシートチェンジ時) 

    お世話になります。 結合セルの名前の取得についてなのですが 以前教えて頂いてダブルクリック時は OKになったのですがワークシートチェンジ時に Msgbox Target.Name.Nameとすると 「アプリケーション定義またはオブジェクト定義 のエラーです。」なります。 なにか制限かあるのでしょうか? 宜しくお願いいたします。

  • 度忘れです、名前つきセルの参照方法

    お世話になります。 三月まで仕事で使っていたのですが、度忘れ?しました。 エクセルでセルに名前を付けて、マクロで 名前を拾う方法を忘れてしまいました? Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) MsgBox Target.name.name End Sub じゃなかったですよね。 宜しくお願いします。

  • 結合セルの値取得について

    お世話になります、 (環境、VISTA&EXCEL2000) 結合セルに名前をつけて その値をマクロで取得したいのですが エラーになります。 結合セルには結合する前に名前をつけてから 結合してあります。 Dim ws As Worksheet ' On Error GoTo errTrap Set ws = Worksheets("xxxxx") '(1) ws.Range("DenDate").Value = Date '(2) MsgBox ws.Range("DenDate").Value (2)で「型が一致しません」になります。 宜しくお願いいたします。

  • セル結合をマクロで行ないたい(その2)

    度々お世話になっております。 エクセル2000ですが、例えばA1:C10の範囲を選択した状態で、一発で横方向のみのセル結合をする(A1,B1,C1を結合、A2,B2,C2を結合、・・・A10,B10,C10を結合)マクロは可能でしょうか?

  • セル結合をマクロで行ないたい

    エクセル2000ですが、アクティブセルとその右隣のセルをマクロを使って結合するにはどのようにすればよいのでしょうか? ご存知の方よろしくお願いします。

  • VBA 結合セルに名前を付ける

    作成中のマクロで、 「B9とB10を結合したセルに名前を付ける」 作業を入れたいのですが、 Range("B9:B10").Name = "あああ" とすると、マクロを実行した時にエラーになってしまいます。 Range("B9").Name = "あああ" としても、エラーになりました。 エラーが出ないvbaを教えてほしいです。

  • Excel(セルの結合マクロ)

    いつもお世話になっております。 Excelのマクロで、選択範囲の中で、下のセルが空白のものは、上のセルと結合されるマクロを作りたいと考えています。 (例1:A1セルに”TEST”が入力されており、A2,A3セルが空白として、A1:A3を選択し、マクロを実行するとA1からA3がセル結合される  例2:A1に”TEST2”B2に"TEST3"が入力されており、A1:B3を選択すると、A1からA3が結合され、B2とB3も結合される) 説明が下手で申し訳ないのですが、お力を貸していただけませんでしょうか? よろしくお願いいたします。

  • エクセルマクロで結合されたセルをコピー

    こんばんは、エクセルで、結合されたセルを結合セル数の違うセルにマクロで貼り付けたいのですが、どのようにしたらよいでしょうか? 結合セル数が違ってもコピー貼り付けできるところとできないところがあるのですが、どうしてでしょうか? よろしくお願い致します!!!!!

  • マクロを使って結合セルに丸を付ける+αな難題。。

    エクセルのマクロについて エクセルでセルや結合セルに丸を付ける質問はどれも見ましたが私にとって難題なものがありましたので、教えて下さい。  結合セルをマクロを使用して丸を付けるものがありますが、どなたか教えては頂けないでしょうか。初心者です、すいません。 1、ダブルクリックで結合セルに文字上に丸(太さ0.75)がつく。 2、ダブルクリックでそのセルから丸が消える。 同じ操作で1,2が繰り返される。 さらにここでもう一つ。 同シート内の※別の場所の結合セルに【データ】の【入力規制】で(リスト)を選択し、リスト内に【■,○,空白,】等の内容を含んでいます。 この上の二つがどちらもちゃんと使える方法が分かりません。 教えては頂けないでしょうか。 ちなみに参考までにマクロはこれを使っています。 正しいマクロを教えて下さい。 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim Shp As Shape Cancel = True If ActiveSheet.Shapes.Count <> 0 Then For Each Shp In ActiveSheet.Shapes If Target.Address = Shp.TopLeftCell.Address Then Select Case Shp.Line.DashStyle Case 1: Shp.Delete: Exit Sub Case 4: Shp.Delete: Exit Sub End Select End If Next End If With ActiveSheet.Shapes.AddShape(msoShapeOval, Target.Left, Target.Top, Target.Width, Target.Height) .Fill.Visible = msoFalse .Line.Weight = 0.75 End With End Sub これと入力規制を使おうとしたら、マクロがデバックになってしまい使用できません。 入力規制は残ったままですが、マクロが使えなくなってしまいました。 解決策、何か違うところ、教えて下さい。

  • セルの結合マクロについて

    セルの結合マクロについてご相談させてください。 セルのA2とA3を結合,B2とB3を結合。 セルのA4とA5を結合,B4とB5を結合。 セルのA6とA7を結合,B6とB7を結合。 というように、A2,A4,A6・・・、B2,B4,B6・・・にデータがあれば、結合するマクロを作成したいです(データがなければそこまでのデータを結合)。 例えば、A2とA3両方にデータがあった場合、A2の内容で表示されるようにしたいです(B2とB3についても同様)。 複雑でどのようにマクロを書けばよいのか困っていました。 恐れ入ります、どのようにすれば良いのかわかる方がいましたら教えていただけないでしょうか。

専門家に質問してみよう