[[20240731110055]]　『計算式の答えが””で無い場合の表示の仕方』（みね）　ページの最後に飛ぶ

『計算式の答えが””で無い場合の表示の仕方』（みね）

H2セルに=IF(A1=1,"田中","")
I2セルに=IF(A1=2,"あいうえおかきくけこ","")
とあります。
両セルとも右揃えの設定になっています。
セル幅は8.38になります。

A1セルが2の場合、I2セルにかきくけこしか表示されません。
仮に計算式が無い場合、I2セルに右揃えであいうえおかきくけこと
入力しH2セルが何も入力されていない場合は、H2セルに突き出して？
表示されます。
計算式があっても答えが無の場合、表示するにはどうしたら良いですか？

わかりずらくてすいませんがよろしくお願いいたします。

＜使用 Excel：Excel2010、使用 OS：Windows10 ＞

＞仮に計算式が無い場合、I2セルに右揃えであいうえおかきくけこと
＞入力しH2セルが何も入力されていない場合は、H2セルに突き出して？
＞表示されます。

この場合、H2セルに【「なにか」が入っているかいないか】がポイントで、
I2セルは関係ありません。

ちなみにB1セルに「=""」とダブルクォーテーション2つ連続で重ねて入力場合は
「長さゼロの文字列」という値がB1セルに入ります。

Excelを新規で作成した場合、各セルには、「何も入っていない」という値が入っています。
「何も入っていない」という値は、他のセルに影響しないので、
「H2セルに突き出して？～」のようなことが起ります。
しかし、「長さゼロの文字列」は文字が入っている(文字数がゼロであるだけ)なので、
H2セルの文字が影響して、I2セルの左寄りの文字列が表示されていないのです。

列幅の調整は、以下のサイトを参考にしてみて下さい。
https://xcelworkblog.com/column-width/
（匿名） 2024/07/31(水) 11:40:05

返信ありがとうございます。

計算式の答えが「何も入っていない」とは出来ないのでしょうか？

他のセルもあり列幅の調整はできません。
また、縮小して全体を表示するもできません。

よろしくお願いいたします。
（みね） 2024/07/31(水) 11:47:19

 できない。

 あとはマクロでA1セルに値が入力された場合に1であればH2セルに田中と入力しI2セルをクリア、2であれば
 H2セルをクリアして、I2セルにあいうえおかきくけこと入力だろうか？
（ねむねむ） 2024/07/31(水) 11:51:25

返信ありがとうございます。

ここに書いたのは一例なのでかなりの数の計算式があるので、初心者の私では
マクロを作ることは難しいです。

何かいい方法を考えてみます。
（みね） 2024/07/31(水) 11:59:52

 そういえば昔似たようなことで対処したことがあった。

 ただ、みねさんの環境で応用できるかはわからないが。

 列を追加し、H列、I列、J列としてH列とJ列に式を入力し、H列とJ列の列幅を1ピクセルにし、I列のセル幅を調節する。
（ねむねむ） 2024/07/31(水) 12:09:15

わざわざありがとうございます。

セルの間なので難しいです。
（みね） 2024/07/31(水) 12:53:27

 Excelの仕様にかかわることなので、
 望みをかなえる直接的、かつ簡易な方法は無いのではないかと思います。
 縮小も不可ということは、それは最終の成果物で印刷用とに使うからでしょうか？
 もし、
    「そのシートのコピーをとり、そのコピーに加工を施す」
 ことが可能であれば、次のようなマクロで対応できそうですが、いかがですか。
 ""となっているセルを、何も入っていないセルに変更します。（書式は変更しません）
 Sub test()
     Dim e As Range
     For Each e In ActiveSheet.UsedRange
         If Len(e) = 0 Then e.ClearContents
     Next
 End Sub

 標準モジュールにコピーして、対象シートをアクティブにした状態で、
 マクロtestを実験してみて下さい。
 バックアップを取ってテストしてください。
（xyz） 2024/07/31(水) 14:28:17

コメント返信：

[ 一覧(最新更新順) ]

[[20240731110055]] 『計算式の答えが””で無い場合の表示の仕方』（みね） ページの最後に飛ぶ

[[20240731110055]]　『計算式の答えが””で無い場合の表示の仕方』（みね）　ページの最後に飛ぶ