質問: エクセルマクロの記述を教えてください。 《条件》 特定の文字列と完全一致した列を降順させる。 《例》 グラフ例。特定の文字列は『売上』
回答: アクティブシートを操作すればいいのでしょうか。 ActiveSheet.UsedRange.Find("売上").CurrentRegion.Sort key1:="売上", order1:=xlDescending, Header:=xlYes でいかかですか? 補足 >「実行時エラー "1004":入力した文字列は参照名または定義名として正しくありません。」 > というエラーになってしまいました。 ああ、そうですね。完全一致検索になってませんね。言葉足らずですいません。 Sub test() Dim R as Range Set R = ActiveSheet.UsedRange.Find("売上", LookAt:=xlWhole) If Not R Is Nothing Then R.CurrentRegion.Sort key1:="売上", order1:=xlDescending, Header:=xlYes End Sub とかしてください。