みなさまお世話になります。
VBAでタイトルの作業を実行したいのです。下記に条件・動作を書かせていただきます。
・A10セルあるいはA10~Axセルまで連続で行の高さを決定する数値が格納されています
・行の高さを変更したい行数xはB1に格納されています
・別途作成したボタンを押すと、B1の数値に基づきA10~Axの行を順番に行の高さを変更していく
※行の高さは「高さ」であり、ピクセルではありません
※ボタンの作成と押した際にVBAを実行されることは私でもなんとかできます。
よろしくお願いいたします。
No.3ベストアンサー
- 回答日時:
No2です。
以下のマクロを標準モジュールに登録してください。
Public Sub 行の高さ設定()
Dim wrow As Long
For wrow = 10 To Range("B1").Value + 9
Rows(wrow).RowHeight = Cells(wrow, 1).Value
Next
End Sub
tatsumaru77さま
お返事が遅くなりすみません
ご提示いただいたマクロで問題なく目的を達成できました
大変助かりました。ありがとうございます!
No.2
- 回答日時:
添付図のようになさりたいということでしょうか。
左側がマクロ実行前、右側が実行後です。
10行から13行(B1の値)まで、行の高さを設定したい。
10行は10(A10の値)にしたい。
11行は20(A11の値)にしたい。
12行は30.7(A12の値)にしたい。
13行は24.3(A13の値)にしたい。
tatsumaru77さま。早速のご回答をありがとうございます。
ほぼその通りですが、一点だけ違いがあります。
B1の「13」は変更する全行数のことになります。
ご提示いただいた例の場合、B1セルには「4」が格納されます。
それ以外はご推察の通りです。
本来なら私が用意すればよい添付図まで用意してくださりありがとうございます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ExcelのVBAを使い、複数シートの同一箇所を、同一条件にて一括でソルバーを回す方法について 1 2022/04/23 11:49
- Visual Basic(VBA) 【関数orVBA】カーソルのある行を黄色にし、A列の値を別シートに表示できますか? 4 2021/12/28 00:03
- Excel(エクセル) 空白行も含めてソートしたい 3 2022/02/01 23:13
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 3 2023/02/28 01:13
- Excel(エクセル) excel 列1000 行30の中から、重複する言葉を抽出し、重複数を数える方法 13 2022/02/05 10:57
- Visual Basic(VBA) vbaについて 主に以下のような設定をしたいです。 Aブックの表の行数が20未満だったら Bブックの 1 2023/06/08 23:40
- 相続・贈与 名義変更について 1 2021/12/27 17:42
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2022/10/12 12:55
- Visual Basic(VBA) エクセルのマクロを教えてください 4 2022/02/04 08:05
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
Excelで文字合成
Excel(エクセル)
-
エクセルのcountifのワイルドカードについて
Excel(エクセル)
-
エクセルの関数でわからないことあるのでコード付きで教えてください
Excel(エクセル)
-
-
4
こんにちは。Excelのデータ入力規則のことで教えてください。複数条件を指定したい場合の構文ですが、
Excel(エクセル)
-
5
エクセル 関数
Excel(エクセル)
-
6
Excel 数行分セル結合したあと、結合した一番下の行を非表示にしたら、罫線が印刷されません。
Excel(エクセル)
-
7
関数を教えていただきたいです。 添付のような「data sheet」があります。 他に、「集計 sh
Excel(エクセル)
-
8
エクセルの行を巾を変えずに増やす方法
Excel(エクセル)
-
9
Excelで【1-11】と入力すると【1月11日】になってしまう
Excel(エクセル)
-
10
エクセル関数またはVBAについて
Excel(エクセル)
-
11
COUNTIFで同一範囲にある複数の内容の数量を簡単に抽出する方法を教えてください。
Excel(エクセル)
-
12
エクセルで⑤番の操作が分かりません。どういう関数が良いんですか?
Excel(エクセル)
-
13
この関数の意味を教えてください。
Excel(エクセル)
-
14
Excelでの頻度計算
Excel(エクセル)
-
15
複数エクセルファイルの合成
Excel(エクセル)
-
16
Excelでこういう年を切り替えられる簡易なカレンダーを作ったのですが、 年や月を変えると、色が付い
Excel(エクセル)
-
17
勤務表について
Excel(エクセル)
-
18
Excelの関数で起きた現象の原因がわかりません。
Excel(エクセル)
-
19
エクセルのセル統合について
Excel(エクセル)
-
20
式の解読のお願いm(_._)m
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
特定の文字がある行以外を削除...
-
excelのデータで色つき行の抽出...
-
直近の5個の平均を求めたい
-
[EXCEL]ボタン押す→時刻が表に...
-
【Excel関数】UNIQUE関数で"0"...
-
アクティブになっている行をマ...
-
エクセル マクロで数値が変っ...
-
Excel グラフのプロットからデ...
-
【EXCEL】連続データの個数を抽...
-
エクセルで特定の文字列が入っ...
-
Excel 時刻の並び替え
-
エクセルのセルに指定画像(.jpg...
-
チェックボックスをクリックし...
-
セルの色によって条件文をつけ...
-
エクセル マクロ オートフィ...
-
エクセル2016で時間を入力して...
-
電話番号の入力方式が違うデー...
-
このような複雑な表をワードで...
-
エクセルで、ポインタのある行...
-
Excel マクロで特定のセルに入...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで特定の文字列が入っ...
-
エクセル マクロ オートフィ...
-
【Excel関数】UNIQUE関数で"0"...
-
[EXCEL]ボタン押す→時刻が表に...
-
結合されたセルをプルダウンの...
-
エクセル マクロで数値が変っ...
-
Excel グラフのプロットからデ...
-
AのセルとB行を比較して、一致...
-
エクセル 上下で列幅を変えるには
-
Excel ウインドウ枠の固定をす...
-
特定の文字がある行以外を削除...
-
excelのデータで色つき行の抽出...
-
エクセル2016で時間を入力して...
-
excel 小さすぎて見えないセル...
-
EXCELで最後の行を固定
-
エクセルVBA 最終行を選んで並...
-
VBAで色の付いているセルの行削除
-
エクセルマクロで偶数行(又は...
-
エクセルのセルに指定画像(.jpg...
-
罫線の斜線を自動で引くマクロ
おすすめ情報
すみません言葉足らずでした。
「マクロの作成をお願いいたします」の一文が抜けておりました。
改めてよろしくお願いいたします。