No.8ベストアンサー
- 回答日時:
No7です。
>短文ですけど、理解が出来ない文ですね。
あぁ、すみません。面倒なので、ショートハンドを使っちゃいました…
>B列には数式入っています。
B列は「入力」と書いてあったので、てっきり関数式は無いものと思いましたけれど・・・
では、いずれにしろNo7ではうまくいきませんね。
内容を訂正して、普通に書くなら、
※ 動作や注意事項はNo7と同じです。
※ 同じ行のA列、B列は片方だけ空白になることはないと解釈しています。
Sub Sample()
Dim n As Long
n = Application.Evaluate("SumProduct((A5:A10 <> """") * 1)")
If n Then Range("A5").Resize(n, 2).Select
End Sub
ありがとうございます。上手く行きました。
何度も丁寧に説明して頂きありがとうございました。
すぐに答えられるのは素晴らしい知識をお持ちですね。
No.7
- 回答日時:
No6です。
>セルはB5,B6と順番に埋まっていくので、
>飛び飛びの範囲になることはないです。
であることを前提にできるのなら、更に簡単になります。(実質1行)
ご指定の「Ctrl+A」などは無視させていただいていますが、以下ではいかがでしょうか?
※ B列には関数式は無いものと仮定しています。
※ B5:B10全てが空白の場合は何もしません。
Sub Sample()
If [CountA(B5:B10)] Then Range("A5").Resize([CountA(B5:B10)], 2).Select
End Sub
>それをマクロに組み込みたいなと考えています。
シートはデフォルト(=Activesheet)として記述してありますので、他のマクロに組み込むのなら、そのあたりをご注意ください。
No.6
- 回答日時:
No5です。
>A5:B10の2列が対象になっており、~~
範囲がA5:B10限定と決まっているのなら、かなり単純化できます。
>B列に値が入らない時、隣のA列は数式のみで空白が表示される数式になっています。
ということは、必ず同じ行が空白になると限定しても良いということと解釈しました。
>説明が難しいですが理解して頂けたでしょうか。
まだ、わかりかねます。
例えば、A5:B10の範囲で、A7:B7及びA9:B9が空白となっている時に、
>あるセルを基準に~~
規準にするセルは「アクティブセル」だと思いますが、上記の状態で、仮に、A5セルがアクティブ(=基準)の時に、選択したい範囲は、A5:B6で良いのでしょうか?
それとも、A5:B6,A8:B8,A10:B10の範囲でしょうか?
もしも後者であれば、基準となるセルは処理とは関係がなく、「A5:B10の範囲で値が空白でないセルを全て選択する」という内容と同値になると思います。
これを更に言い換えれば、「(関数式のない)B5:B10で値のあるセルを選択し、それをA列まで拡張する」と同じことになると考えられます。
もしも、ここまで言い換えても良いのなら、ご質問の処理は、とても簡単なものになるでしょう。
No.5
- 回答日時:
こんにちは
>隣接しているので1つの範囲にしたいです。
「隣接している」の考え方に二通りありそうに思えます。
>あるセルを基準に、例えばCtrl+Aでセルに値が入力されている部分を選択したいのです。
>その時に数式が入ってはいるが空白になっているセルは選択されないようにしたいのです。
仮に、先に空白に見えているセルの数式を削除してからCtrl+Aで選択される範囲と、文章通りにそのままCtrl+Aで選択される範囲とは異なる可能性がありますが、どちらなのでしょうか?
例えば、A1:C10の範囲で、A列とC列に値があり、B列には空白となる数式が全てあるとして、Ctrl+AではA1:C10全体が選択されますが、B列の数式を全て削除してからCtrl+Aでは、元の選択セルの列のみが選択範囲となります。
文章通りの場合は、ActiveCell.CurrentRegion(=Ctrl+Aとほぼ同じ:空白セル選択時の結果が異なる)から、値が空白のセルを除けばよいので、比較的簡単にできます。
そうでない場合は、結果が空白の数式を実際に消してしまうわけにはいかないので、チョット工夫が必要になります。
前にも教えて頂いたような、いつもありがとうございます。他の方ならそんなことしないと言われそうですが、とりあえず今は、A5:B10の2列が対象になっており、B列に値が入れば、となりのA列にも値が入るような数式になっています。B列に値が入らない時、隣のA列は数式のみで空白が表示される数式になっています。例えばB5とB6に値が入ったらA5:B6が選択されるようにしたいのですが現状だと数式が入っているため、どんな時もA5:B10が選択されてしまいます。
説明が難しいですが理解して頂けたでしょうか。よろしくお願いしますか
No.4
- 回答日時:
>それをマクロに組み込みたいなと考えています。
VBAで数式が入っているセルかどうかを判断したいという事でもないんですよね?
If Not Cells(2, 2).HasFormula Then
MsgBox "数式なし"
ElseIf Cells(2, 2).HasFormula Then
MsgBox "数式あり"
End If
選択前と選択後の写真を見せていただくことは可能ですか?
これ(選択前)をこう(選択後)したいというのが分かれば、
他の方からの回答も付きやすくなるのではないかと思います。
No.3
- 回答日時:
ジャンプ機能だと選択したい範囲に空白が含まれていたらそれが除外されてしまいますからね。
選択したい範囲に数式ではなくて、範囲全部が埋まっている列はないのですか?
No.2
- 回答日時:
そうでしたか。
私が試した限りだと、下記の方法で
「数式が入ってはいるが空白になっているセルは選択されない」
という状態になりますが、質問者さんの場合はどういう状態になりましたか?
0.Ctrl+A を押します。
1.Ctrl+G を押します。
2.セル選択 を押します。
3.下記にチェックを入れます。
●定数
■数値
■文字
■論理値
■エラー値
4.OK を押します。
教えて頂いたのを少し変更して、該当せるを選択出来るようにはなったのですが、これは1つ1つのセルが独立して選択されるのですね。
確かにその通りだと思うのですが、今回私が考えているセルは隣接しているので1つの範囲にしたいです。
それをマクロに組み込みたいなと考えています。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excel 特定セルの数値を参照したセルの0表示が空白にならないのはどうしてか? 3 2022/04/28 22:23
- Excel(エクセル) ユーザー定義について質問です。 2 2023/06/28 13:21
- Excel(エクセル) WORKDAY関数 4 2023/06/08 13:23
- Excel(エクセル) エクセルのグラフで式や文字列を無視したい 2 2022/12/14 10:47
- Excel(エクセル) Excelについて質問です(ver2019) 1 2023/06/30 21:20
- Excel(エクセル) 列の複数ある空白セルを飛ばして、セルに並べて表示したい 3 2023/02/12 16:49
- Excel(エクセル) xlDownの使い分けについての質問です vbaでxlDownを使って一覧近い空白までのセルをコピー 3 2022/08/04 12:20
- Visual Basic(VBA) 【VBA】Excelで罫線を引きたい 3 2022/07/14 12:04
- Excel(エクセル) VBA 特定の列に入っているテキストをコピペ 2 2023/06/14 11:24
- Visual Basic(VBA) ExcelVBAのマクロについて。 9 2022/05/04 14:50
このQ&Aを見た人はこんなQ&Aも見ています
-
一回も披露したことのない豆知識
あなたの「一回も披露したことのない豆知識」を教えてください。
-
【お題】動物のキャッチフレーズ
【お題】「百獣の王 ライオン」「実は動物界最強 カバ」は分かるけど、それはちょっとピンと来ないなと思った動物のキャッチフレーズ
-
限定しりとり
文字数6文字以上の単語でしりとりしましょう
-
チョコミントアイス
得意ですか?不得意ですか?できれば理由も教えてください。
-
あなたが好きな本屋さんを教えてください
どのくらいの規模間で、どのような本が並んでいるか、どのような雰囲気なのかなどなど...
-
空白セル内の数式を残したままで空白セル扱いとしたいのですが
Excel(エクセル)
-
EXCELの条件付き書式で数式を空白と認識してくれる方法
Excel(エクセル)
-
エクセルで数式を入れても値が空欄になります
Excel(エクセル)
-
-
4
数式の結果が空白の時の空白扱い
Excel(エクセル)
-
5
エクセルで数式の入った空白セルを空白認識させカウント数に含めない方法
Excel(エクセル)
-
6
Excel:関数が入っているセルに対しての条件付き書式設定について質問です。 ①A1のセルに関数が入
Excel(エクセル)
-
7
IFS関数の場合で、セルが空白の場合は何も表示しないようにする方法
Excel(エクセル)
-
8
IF関数で空欄(")の時、Nullにしたい
その他(Microsoft Office)
-
9
エクセル: セルの枠を超えて表示
Excel(エクセル)
-
10
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
11
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
12
エクセルの色も=イコールできますか?
Windows Me・NT・2000
-
13
数式の計算結果により表示されたセルを数える関数を教えてください
Excel(エクセル)
-
14
エクセル書式設定 関数式の入ったセルを空白とみなし、選択範囲で中央となる方法
その他(ビジネス・キャリア)
-
15
EXCELで条件付き書式で空白セルの時は塗りつぶし無しにする方法
Excel(エクセル)
-
16
EXCEL計算式が入っているセルを空白表示に
Excel(エクセル)
-
17
Excelでセル参照したとき、書式も一緒に持ってくるには?
Windows Vista・XP
-
18
結合したセルを含む列内で、条件付き書式として塗りつぶしたい
Excel(エクセル)
-
19
別ファイルを開かず、INDIRECT関数を使用せずに、別ファイルのデータを求めたい
Excel(エクセル)
-
20
エクセルの複数のセルを一括で絶対参照にする方法
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・「それ、メッセージ花火でわざわざ伝えること?」
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・【お題】甲子園での思い出の残し方
- ・【お題】動物のキャッチフレーズ
- ・人生で一番思い出に残ってる靴
- ・これ何て呼びますか Part2
- ・スタッフと宿泊客が全員斜め上を行くホテルのレビュー
- ・あなたが好きな本屋さんを教えてください
- ・かっこよく答えてください!!
- ・一回も披露したことのない豆知識
- ・ショボ短歌会
- ・いちばん失敗した人決定戦
- ・性格悪い人が優勝
- ・最速怪談選手権
- ・限定しりとり
- ・性格いい人が優勝
- ・これ何て呼びますか
- ・チョコミントアイス
- ・単二電池
- ・初めて自分の家と他人の家が違う、と意識した時
- ・「これはヤバかったな」という遅刻エピソード
- ・ゴリラ向け動画サイト「ウホウホ動画」にありがちなこと
- ・泣きながら食べたご飯の思い出
- ・一番好きなみそ汁の具材は?
- ・人生で一番お金がなかったとき
- ・カラオケの鉄板ソング
- ・自分用のお土産
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA_日時のソート
-
ミリ秒を時間へ変更するには? ...
-
【マクロ】上のデータに下のデ...
-
エクセルで教えてください。 例...
-
エクセルの数式について教えて...
-
テーブルの合計、エラーをはぶ...
-
Excelのチェックボックスについ...
-
【オートフィルター】3つのシ...
-
2枚のエクセル表で数字をマッチ...
-
エクセルで、一部のセルだけ固...
-
Excelファイルを開くと私だけVA...
-
マクロ セルを右クリックした時...
-
【Excel】エクセルで書式なしコ...
-
excelVBAについて。
-
弥生青色申告オンライン .csvの...
-
セルの左に余白を付ける
-
エクセルで、数字の下4桁の0を...
-
ExcelVBAについて。
-
excelVBAについて。
-
ExcelのIF関数との組み合わせの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルの設定、下へスクロー...
-
別のシートの指定列の最終行を...
-
【マクロ】シート追加時に同じ...
-
Excelファイルを開くと私だけVA...
-
Excelの関数を教えて下さい。
-
マクロを実行すると、セル範囲...
-
エクセルの設定、特定の列以降...
-
Excelの条件付書式について教え...
-
Excelで作成した出欠表から日付...
-
Excelでの文字入力について
-
Excel 日付の表示が直せません...
-
Excel関数の解決方法
-
システムファイルについて
-
自動的に日付入力 応用
-
UNIQUE関数の代用
-
エクセル内に読み込んが画像の...
-
勤務外時間を出す表が作りたい
-
Excel 偶数月の15日(土日祝...
-
【マクロ】Call関数で呼び出し...
-
【マクロ】1回目の実行後、2...
おすすめ情報