Excel VBA質問箱 IV

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

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


29365 / 76732 ←次へ | 前へ→

【52649】Re:最大値のアドレスについて
発言  じゅんじゅん  - 07/11/23(金) 21:09 -

引用なし
パスワード
   Match関数ではないですが。

Sub test()
Dim r As Range
Set r = Range("D3,D6,D9,D12,D15,D18,D21,D24,D27")

With Application
   .Goto r.Find(.Max(r), LookIn:=xlValues, lookat:=xlWhole)
End With
End Sub
こんなのはどうでしょう?

0 hits

【52647】最大値のアドレスについて hato 07/11/23(金) 20:37 質問
【52648】Re:最大値のアドレスについて かみちゃん 07/11/23(金) 21:03 発言
【52651】Re:最大値のアドレスについて hato 07/11/23(金) 21:23 お礼
【52649】Re:最大値のアドレスについて じゅんじゅん 07/11/23(金) 21:09 発言
【52652】Re:最大値のアドレスについて hato 07/11/23(金) 21:25 お礼
【52650】Re:最大値のアドレスについて ichinose 07/11/23(金) 21:13 発言
【52667】Re:最大値のアドレスについて Mari 07/11/25(日) 12:55 質問
【52668】Re:最大値のアドレスについて neptune 07/11/25(日) 13:05 回答

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