[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『マクロ 指定列から右に5つ目まで選択』(MIKU)
こんにちは。初心者でわかりにくい点があればすみません。
商品数の列から右に5つ目まで選択ということができますでしょうか?
いただくデータが、固定列ではないため、毎回D列が商品名だったり、E列だったりするため、商品名の文字から選択できたらうれしいです。
オフセットも拾ってみましたが、列ではなくセルが選択され、うまくいきませんでした。
ご教授いただけますと幸いです。
Cells.Find("商品名").Select ‘商品名セル選択 Columns(ActiveCell.Column) ‘商品名の列を選択
よろしくお願いします。
< 使用 Excel:unknown、使用 OS:Windows10 >
とりあえず、の回答です。 エラー処理等何もなしです。
Cells.Find("商品名").Resize(, 5).Select (OK) 2019/08/16(金) 18:29
あ〜列全体を選択したいのか。 なぜ選択するのでしょう? (OK) 2019/08/16(金) 18:30
列全体を選択したいのなら、 EntireColumn
行全体なら EntireRow
Cells.Find("商品名").Resize(, 5).EntireColumn.Select (OK) 2019/08/16(金) 18:32
お盆にもかかわらず、ほんとうにありがとうございます。
したいことは、非表示でしたが、こちらは拾ってきまして、OK様からいただいたものと合致させ、
問題なく進めることができました!
また行と列の説明もいただきありがとうございました。保存いたしました。
Selection.EntireColumn.Hidden = True ‘非表示
ほんとうに感謝です!
(MIKU) 2019/08/16(金) 18:44
選択する必要はありません。
Cells.Find("商品名").Resize(, 5).EntireColumn.EntireColumn.Hidden = True (OK) 2019/08/16(金) 18:50
>Cells.Find("商品名").Resize(, 5).EntireColumn.EntireColumn.Hidden = True
EntireColumnがダブってしまいました。 エラーにはならないけど
Cells.Find("商品名").Resize(, 5).EntireColumn.Hidden = True (OK) 2019/08/16(金) 18:52
Columnsを使うならこんな方法も。
Sub test() Dim mycol As Integer mycol = Cells.Find("商品名").Column Columns(mycol).Resize(, 4).Hidden = True End Sub
(OK) 2019/08/16(金) 18:59
あう〜。間違え。
>Columns(mycol).Resize(, 4).Hidden = True ↓ Columns(mycol).Resize(, 5).Hidden = True (OK) 2019/08/16(金) 19:02
Sub test() 上記も頂戴いたします。ありがとうございます。
ほんとうにお時間割いていただきありがとうございます。
自分がしたいことが、なかなか調べきれず、お力添えいただきありがとうごましたm(__)m
(MIKU) 2019/08/16(金) 19:11
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.