advanced help
per page, with , order by , clip by
Results of 1 - 1 of about 4267 for オートフィルタ (0.004 sec.)
[[20110404114927]]
#score: 4240
@digest: 3639aef579616242964195c56569cb91
@id: 54015
@mdate: 2011-04-04T07:59:08Z
@size: 1964
@type: text/plain
#keywords: タ” (9213), 録シ (7728), ロwo (7005), 動→ (5526), 前検 (4869), タ") (4088), 付検 (3641), 索用 (3541), ト” (3352), 用セ (3028), 別マ (2827), ロ2 (1813), xlvalues (1744), 枠線 (1647), operation (1356), skipblanks (1336), トフ (1158), pastespecial (1151), xlcontinuous (992), オー (989), transpose (949), ルタ (829), linestyle (782), タ行 (751), paste (702), フィ (695), ィル (661), borders (631), 登録 (596), 月1 (577), 大量 (567), デー (563)
『自動で枠線、自動でオートフィルタから検索』(ほし)
宜しくお願いします。 マクロ Worksheets("データ").Range("A" & End_Row).Value = Now() Worksheets("登録シート").Range("C2:C10").Select Selection.Copy Sheets("データ").Range("A" & End_Row).PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True Application.CutCopyMode = False Sheets("データ").Select (”データ”の一番下の行に、”登録シート”の内容を転記する)マクロです これに 転記したデータ行「A:I」に枠線をつけるマクロ を追加したいです。 また B列 C列 にはオートフィルタを設定しています。 日付と氏名なのですが、データが大量にある為、オートフィルタで検索するのが大変です。 検索用の別マクロを作りたいのですが、お教え頂けないでしょうか。 (”登録シート”の空いたセルに「日付検索用セル」「名前検索用セル」を作成し、 「1月1日」と日付を入れると”データ”に移動→「1月1日」のオートフィルタ 「ほし」と名前を入れると”データ”に移動→「ほし」のオートフィルタ となるのが、理想です。マクロ2通りになってかまいません) ---- 罫線の対応の部分だけですが、 Sheets("データ").Range("A" & End_Row).PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True を With Sheets("データ").Range("A" & End_Row) .PasteSpecial Paste:=xlValues, Transpose:=True .Resize(1,9).Borders.LineStyle = xlContinuous End With に変えてどうでしょうか。 この辺りはマクロの記録でも取得できますし、ネットでもいろいろと例が 見つかると思います。 (Mook) ---- mookさん ありがとうございます^^ ---- Sub Macro1() A = Range("C13").Value Sheets("データ").Select Selection.AutoFilter Field:=3, Criteria1:=A End Sub 自分で考えて作ったマクロはコレなのですが オートフィルタを選択するところまでは行くのですが、どうも反応しません・・・。 (ほし) ---- A = Range("C13").Value を A = Range("C13").Text にすると動作したりしませんか。 (みやほりん)(-_∂)b ...
https://www.excel.studio-kazu.jp/wiki/kazuwiki/201104/20110404114927.txt - [detail] - similar
PREV NEXT
Powered by Hyper Estraier 1.4.13, with 97049 documents and 608241 words.

訪問者:カウンタValid HTML 4.01 Transitional