![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
関数で、
=ABS(MATCH(D$9,6:6,0)-COLUMN(D$9))
上記のような数式があります。
この数式を、VBAで書換たいのです。
Sub ズレカウント()
Dim j As Long
For j = 4 To 38 Step 2
With Application
Cells(10, j) = .Match(Cells(9, j), Range("D6:AL6"), 0) - Columns(Cells(9, j))
End With
Next j
End Sub
- Columns(Cells(9, j))
この部分を、記載すると、型が一致しませんとなります。
同じ数値なので、型が一致するとおもうのですが、
どこを修正すればいいでしょうか?
お手数ですが、ご教示を尾根がします。
No.3
- 回答日時:
COLUMN関数は列番号を返す関数なので、COLUMN(D$9)ではD列9行セルは「何列目?」と言う意味。
4列目なので、COLUMN(D$9)=4です。
一方のVBAでのColumnsは列を表すRangeオブジェクトを返すプロパティ。
4じゃ有りません。
jが列番号を表してるのですから、
- Columns(Cells(9, j)では無くて、単に-jです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ExcelVBAで、index、match関数を使用して、指定範囲に出力したい 3 2022/10/18 21:53
- Visual Basic(VBA) まとめシートから集計シートへA列のコードが一致したら1行コピーするマクロをネット上で見つけました。こ 1 2022/08/30 14:11
- Excel(エクセル) VBAで組み合わせ算出やCOUNTIFSの処理を高速化したいです。 4 2022/04/07 02:38
- Visual Basic(VBA) ユーザーフォームに2つのコンボボックス銀行名「ConboBox1」支店名を「ConboBox2」とし 4 2022/08/03 17:34
- Visual Basic(VBA) 数字が「0」の列を削除するため、下記のコードを実行しましたが、コンパイルエラーSubまたはFunct 3 2022/12/04 00:00
- Visual Basic(VBA) VBA横データを縦にしたいです 2 2023/08/08 19:38
- Visual Basic(VBA) 前回ご教授いただいたコードに覚えたてのループ処理で品名りんごAから順に20回for nextでループ 7 2023/01/13 22:01
- Visual Basic(VBA) Excelマクロでセルに値が入力されたら実行する 5 2023/08/06 11:03
- Visual Basic(VBA) 改行ごとに行を追加し、数量を分割 4 2023/07/11 16:39
- Visual Basic(VBA) vbaを早くしたい 5 2022/09/09 10:58
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
エクセルエラー13型が一致しませんの直し方教えて下さい。
その他(Microsoft Office)
-
vbaでworksheetfunctionでの複数関数がエラーになります
Visual Basic(VBA)
-
worksheetFunctionクラスのVlookupプロパティを取得できません エラーへの対応
Visual Basic(VBA)
-
-
4
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
5
VBAの日付チェックでオーバーフローを回避したい。
Access(アクセス)
-
6
ユーザーフォームが消えない
Excel(エクセル)
-
7
複数シートの複数列に入力されているデータを重複なしで抽出するVBAを作りたいです。
Visual Basic(VBA)
-
8
VBAのフィルター操作
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
サブフォルダに格納されている...
-
IF文、条件分岐の整理方法
-
VBAコードのインデント表示
-
【ExcelVBA】値を変更しながら...
-
VBA 別ブックからコピペしたい...
-
[VB.net] ボタン(Flat)のEnable...
-
【ExcelVBA】インデックスが有...
-
Excel VBA 定義されたプロージ...
-
Excel-VBAのmsgBox()の不思議
-
時間短縮のために、テキストフ...
-
vbaにてseleniumを使用したedge...
-
現在のブックを閉じないで、マ...
-
Outlookにて既にウィドウ単体で...
-
excelのVBAについて、以下のコ...
-
Excel VBA 選択範囲の罫線色の...
-
Excel関数またはVBAでの質問に...
-
Outlookの「受信日時」「件名」...
-
VBA実行後に元のセルに戻りたい
-
VBA ユーザーフォーム ボタンク...
-
VB.net(VB)で、フォームにExcel...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAなくなるの?
-
VBAでCOPYを繰り返すと、処理が...
-
vba 削除
-
プログラミング
-
Excelのマクロについて教えてく...
-
Excelのマクロについて教えてく...
-
エクセルのVBAコードについて教...
-
久しぶりのプログラミング
-
ユーザーフォームに別シートか...
-
エクセルVBAコードで教えて下さ...
-
VBA 別ブックからコピペしたい...
-
ExcelのVBAコードについて教え...
-
VBAコードについて教えてくださ...
-
vba アクティブシートの名前変...
-
Excelのマクロについて教えてく...
-
エクセルVBA
-
Geogebraの操作方法について
-
マクロの記録を使用したマクロ...
-
Excel(M365) Vlookup/セル反転(...
-
Excel 範囲指定スクショについ...
おすすめ情報