Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


6544 / 13644 ツリー ←次へ | 前へ→

【44479】マクロを相対座標で記録するには? fuku 06/11/17(金) 17:49 質問[未読]
【44480】Re:マクロを相対座標で記録するには? Reco 06/11/17(金) 18:33 発言[未読]
【44482】Re:マクロを相対座標で記録するには? 飛ばない豚 06/11/17(金) 19:05 発言[未読]
【44483】Re:マクロを相対座標で記録するには? りん 06/11/17(金) 19:20 発言[未読]
【44543】Re:マクロを相対座標で記録するには? fuku 06/11/21(火) 10:07 質問[未読]
【44550】Re:マクロを相対座標で記録するには? 飛ばない豚 06/11/21(火) 17:13 発言[未読]
【44551】Re:マクロを相対座標で記録するには? fuku 06/11/21(火) 17:19 お礼[未読]
【44552】Re:マクロを相対座標で記録するには? りん 06/11/21(火) 17:38 発言[未読]
【44553】Re:マクロを相対座標で記録するには? fuku 06/11/21(火) 18:16 発言[未読]
【44555】Re:マクロを相対座標で記録するには? りん 06/11/21(火) 19:17 発言[未読]
【44623】Re:マクロを相対座標で記録するには? fuku 06/11/24(金) 14:46 お礼[未読]
【44624】Re:マクロを相対座標で記録するには? りん@通りすがり 06/11/24(金) 14:59 発言[未読]
【44625】Re:マクロを相対座標で記録するには? fuku 06/11/24(金) 15:07 質問[未読]
【44627】Re:マクロを相対座標で記録するには? りん 06/11/24(金) 19:11 発言[未読]

【44479】マクロを相対座標で記録するには?
質問  fuku  - 06/11/17(金) 17:49 -

引用なし
パスワード
   通常自動記録すると、絶対座標で記録されてしまうのですが、
相対座標で記録する方法があるらしいです。

ご存知の方がありましたら、教えてください。
お願いします。

【44480】Re:マクロを相対座標で記録するには?
発言  Reco  - 06/11/17(金) 18:33 -

引用なし
パスワード
   ▼fuku さん:
>通常自動記録すると、絶対座標で記録されてしまうのですが、
>相対座標で記録する方法があるらしいです。

Reference Styleのことでしょうか?
helpで検索されると出ていますよ。

【44482】Re:マクロを相対座標で記録するには?
発言  飛ばない豚  - 06/11/17(金) 19:05 -

引用なし
パスワード
   ▼fuku さん:
自動記録を始めると、ツールバーが表示されるかと思います。

そのツールバーには、「記録停止」するボタンと、
もう一つ「絶対参照/相対参照を切り替える」ボタンがあります。

このボタンを押すと、記録中にいつでも、絶対参照・相対参照を
切り替えることが出来ます。

このボタンのことで良いのかな?(^・ω・^)

【44483】Re:マクロを相対座標で記録するには?
発言  りん E-MAIL  - 06/11/17(金) 19:20 -

引用なし
パスワード
   飛ばない豚 さん、こんばんわ。
>このボタンを押すと、記録中にいつでも、絶対参照・相対参照を
>切り替えることが出来ます。
>
>このボタンのことで良いのかな?(^・ω・^)
あのシートみたいなボタンにそんな意味があったとは知りませんでした。( ´・ω・`)

記録しつつクリックして切り替えてみたら、不思議なコードが記録がされますね。
Sub Macro3()
  Range("D4").Select
  ActiveCell.FormulaR1C1 = "1"
  '切り替え R1C1
  ActiveCell.Offset(1, 1).Range("A1").Select
  ActiveCell.FormulaR1C1 = "1"
  '切り替え A1
  Range("F6").Select
  ActiveCell.FormulaR1C1 = "1"
  '切り替え R1C1
  ActiveCell.Offset(1, 1).Range("A1").Select
  ActiveCell.FormulaR1C1 = "1"
  '切り替え A1
  Range("H8").Select
  ActiveCell.FormulaR1C1 = "1"
End Sub


.Range("A1")がいらないような?

【44543】Re:マクロを相対座標で記録するには?
質問  fuku  - 06/11/21(火) 10:07 -

引用なし
パスワード
   ▼飛ばない豚 さん:
返事遅くなってしまいすみませんでした。
しかも親切にありがとうございます。
>▼fuku さん:
>自動記録を始めると、ツールバーが表示されるかと思います。
>
>そのツールバーには、「記録停止」するボタンと、
>もう一つ「絶対参照/相対参照を切り替える」ボタンがあります。
>
>このボタンを押すと、記録中にいつでも、絶対参照・相対参照を
>切り替えることが出来ます。
>
>このボタンのことで良いのかな?(^・ω・^)

ですが、ツールバーから出しても、記録停止ボタンは出てくるのですが、
切り替えボタンは出てきません・・・

またお手すきなときに教えてください。

【44550】Re:マクロを相対座標で記録するには?
発言  飛ばない豚  - 06/11/21(火) 17:13 -

引用なし
パスワード
   ▼fuku さん:

> ですが、ツールバーから出しても、記録停止ボタンは出てくるのですが、
> 切り替えボタンは出てきません・・・

念のため確認です。

表示したのは、「記録終了」ツールバーですよね。
htt p://www.microsoft.com/japan/office/previous/2003/experience/workstyle/tips/excel/tips15.mspx
(のマル6が指しているツールバー)


「記録終了」ツールバーだった場合、少し調べてみたのですが、
「相対参照」ボタンを消してしまった場合の復活方法は分かりませんでした。
(なにか方法はあるとは思うのですが。。。。。)


力になれずすみません。(´・ω・`)

【44551】Re:マクロを相対座標で記録するには?
お礼  fuku  - 06/11/21(火) 17:19 -

引用なし
パスワード
   ▼飛ばない豚 さん:
>▼fuku さん:
>
>> ですが、ツールバーから出しても、記録停止ボタンは出てくるのですが、
>> 切り替えボタンは出てきません・・・
>
>念のため確認です。
>
>表示したのは、「記録終了」ツールバーですよね。
>htt p://www.microsoft.com/japan/office/previous/2003/experience/workstyle/tips/excel/tips15.mspx
>(のマル6が指しているツールバー)
>
>
>「記録終了」ツールバーだった場合、少し調べてみたのですが、
>「相対参照」ボタンを消してしまった場合の復活方法は分かりませんでした。
>(なにか方法はあるとは思うのですが。。。。。)
>
>
>力になれずすみません。(´・ω・`)

わざわざすみません・・・
親切にありがとうございます。

私ももう少しさがしてみます。
今後とも宜しくお願いいたします。

【44552】Re:マクロを相対座標で記録するには?
発言  りん E-MAIL  - 06/11/21(火) 17:38 -

引用なし
パスワード
   こんばんわ。

>>表示したのは、「記録終了」ツールバーですよね。
>>htt p://www.microsoft.com/japan/office/previous/2003/experience/workstyle/tips/excel/tips15.mspx

>>「記録終了」ツールバーだった場合、少し調べてみたのですが、
>>「相対参照」ボタンを消してしまった場合の復活方法は分かりませんでした。
>>(なにか方法はあるとは思うのですが。。。。。)
ボタンが非表示になってるだけの気がしますが。
ボタンを消してしまった場合には、表示 → ツールバー → ユーザー設定
記録終了を選んだ状態にして、リセットをクリック です。(XL2000)

【44553】Re:マクロを相対座標で記録するには?
発言  fuku  - 06/11/21(火) 18:16 -

引用なし
パスワード
   ▼りん さん:
>こんばんわ。
>ボタンが非表示になってるだけの気がしますが。
>ボタンを消してしまった場合には、表示 → ツールバー → ユーザー設定
>記録終了を選んだ状態にして、リセットをクリック です。(XL2000)


たびたびすみません。

教えていただいたとおりやってみたのですが、
どうも出てきません・・・

記録終了の横には、セキュリティボタンがありまして、
上の方法をしても、セキュリティが出てくるだけになってしまします・・

ややこしくてすみません・・

【44555】Re:マクロを相対座標で記録するには?
発言  りん E-MAIL  - 06/11/21(火) 19:17 -

引用なし
パスワード
   fuku さん、こんばんわ。
>記録終了の横には、セキュリティボタンがありまして、
>上の方法をしても、セキュリティが出てくるだけになってしまします・・
相対参照のボタンがあるかどうか確認してみましょう。
以下のコードを実行してみてください。

Sub test()
  Dim cb As CommandBar, cbc As CommandBarControl
  Dim RR As Long, CC As Long
  Dim ws As Worksheet
  '新しいシート
  Set ws = Application.Workbooks.Add.Worksheets(1)
  '
  For Each cb In Application.CommandBars
   RR = RR + 1: CC = 1
   ws.Cells(RR, CC).Value = cb.NameLocal
   '
   For Each cbc In cb.Controls
     If cbc.Type = msoControlButton Then
      CC = CC + 1
      ws.Cells(RR, CC).Value = cbc.Caption
     End If
   Next
  Next
  '
  On Error Resume Next
  ws.UsedRange.Find("相対参照", Lookat:=xlPart).Select
  '
  ws.Parent.Saved = True
  Set ws = Nothing
End Sub

あったらセルが選択されますので、その行のA列のツールバーにボタンが乗っているはずです。

【44623】Re:マクロを相対座標で記録するには?
お礼  fuku  - 06/11/24(金) 14:46 -

引用なし
パスワード
   ▼りん さん,
こんにちわ。返事おそくなってすみません・・・
>
>相対参照のボタンがあるかどうか確認してみましょう。
>以下のコードを実行してみてください。
>
>じっこうしてみたのですが、やはりないようです。
自宅のパソコンではきちんと出てきたので、
会社のものは本当にないということなんでしょうか?

相対座標以外で、ほかの方法でなんとかマクロを作ることを考えてみます。

何度も教えていただきまして、本当にありがとうございました。

【44624】Re:マクロを相対座標で記録するには?
発言  りん@通りすがり  - 06/11/24(金) 14:59 -

引用なし
パスワード
   fuku さん、こんにちわ。

>じっこうしてみたのですが、やはりないようです。
>自宅のパソコンではきちんと出てきたので、
>会社のものは本当にないということなんでしょうか?
会社のエクセルのバージョンは?

>相対座標以外で、ほかの方法でなんとかマクロを作ることを考えてみます。
記録しないといけないのですか?
なぜ相対座標じゃないといけないのですか?
記録したものを相対座標におきかえてはいけないのですか?

【44625】Re:マクロを相対座標で記録するには?
質問  fuku  - 06/11/24(金) 15:07 -

引用なし
パスワード
   ▼りんさん:こんにちわ
>>
>>相対座標以外で、ほかの方法でなんとかマクロを作ることを考えてみます。
>記録しないといけないのですか?
>なぜ相対座標じゃないといけないのですか?
>記録したものを相対座標におきかえてはいけないのですか?

XPのVer5.1でした
マクロに関して、まったく初心者なので、
まだ自動記入しか出来なくて、置き換えかたがわかりません・・

教えていただけませんでしょうか?

【44627】Re:マクロを相対座標で記録するには?
発言  りん E-MAIL  - 06/11/24(金) 19:11 -

引用なし
パスワード
   fuku さん、こんばんわ。
>XPのVer5.1でした
EXCEL XP ?

>マクロに関して、まったく初心者なので、
>まだ自動記入しか出来なくて、置き換えかたがわかりません・・
>教えていただけませんでしょうか?
教えてあげたいのはやまやまですが、例えば『(絶対参照で)記録されたマクロはこうですが、この○○の部分を相対参照にしたいです』とか、『この○○の部分を変数にしたいです』みたいな書き方をしていただけば答えようもありますが、今までの流れをみても一度もどんな処理をしたいのかの記述が無いので、アドバイスのしようもありません。

6544 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free