Excel VBA 質問スレ Part62

[1 2019/06/24(月) 00:21:37.48]

!extend:checked:vvvvv:1000:512

ExcelのVBAに関する質問スレです
コード書き込みや作成依頼もOK

※前スレ
Excel VBA 質問スレ Part61
http://mevius.5ch.net/test/read.cgi/tech/1556203263/

---

VIPQ2_EXTDAT: checked:vvvvv:1000:512:----: EXT was configured

[2 デフォルトの名無しさん (ﾜｯﾁｮｲ 5b68-Im5L) 2019/06/24(月) 09:54:51.06 ID:pOxYP/iS0]

保守

[3 デフォルトの名無しさん (ｵｲｺﾗﾐﾈｵ MM9d-T9Bf) 2019/06/24(月) 10:30:40.50 ID:/dcVGEspM]

>>1
令和初乙

[4 デフォルトの名無しさん (ｱｳｱｳｳｰ Sac5-Ozek) 2019/06/24(月) 13:02:31.59 ID:H9TPhtT7a]

皆さん無知はいいんですよ
誰でも知らないこと、間違って理解してることはあるんだから

だけど知ったような口をきくから叩かれるのですよ
気をつけましょうね

[5 デフォルトの名無しさん 2019/06/24(月) 15:03:11.87]

令和初か

[6 デフォルトの名無しさん (ﾄﾞｺｸﾞﾛ MM2d-w2KU) 2019/06/24(月) 20:50:58.37 ID:zxVE+D4VM]

>>4
なんか辛い目にあったのか？

[7 デフォルトの名無しさん (ｱｳｱｳｳｰ Sac5-qm+P) 2019/06/25(火) 20:13:59.77 ID:YzkEODl+a]

ムチでたたかれたいんじゃね

[8 デフォルトの名無しさん (ｽｯｯﾌﾟ Sdb3-tfaa) 2019/06/26(水) 18:24:48.22 ID:0wa1QMM+d]

オートフィルターで抽出条件を変数にして繰り返し処理で1ずつ加算していくことは出来ませんか？
下記では出来ませんでした。

For i = 1 to 10
Range("A1").AutoFilter _
Field:=2, Criteria1:="i"
next

[9 デフォルトの名無しさん (ｵｯﾍﾟｹ Sr8d-w5tu) 2019/06/26(水) 18:55:16.75 ID:WMWleXLcr]

iの前後にある"は要らないのでは

[10 デフォルトの名無しさん (ﾜｯﾁｮｲ d991-cyYs) 2019/06/26(水) 21:19:57.14 ID:G0xbFDCN0]

何故ダブルクォーテーションで括ろうとしたのか全く意味不明。

[11 デフォルトの名無しさん (ｽｯｯﾌﾟ Sdb3-tfaa) 2019/06/26(水) 21:32:13.70 ID:0wa1QMM+d]

なるほど！ありがとうございます。最初記録させてそれを元に１つずつやろうと思って、その名残で囲っていました。
助かります！

[12 デフォルトの名無しさん (ﾜｯﾁｮｲ a1da-Im5L) 2019/06/26(水) 23:33:00.96 ID:HbMJ8lDB0]

中二病みたいな感じにしたらこうかな?

┌→ FoR Z = 1 ─┐
│　　　　　　　　　　 └→ 10
│　RANgE("A1").AutoF F = 2, C = Z
│　　　　　　　　│
└┐　　　　　　 │
　 └ NExT　　 │
　　　　　　　　　 ↓
　　　　　　　　　 ×