お世話になります。現在、他のファイルを開かずにコピペーストを思案中なのですが、空白の時には空白にするにはどうすればよいでしょうか？

Sub テスト()
Dim file_nm as String
file_nm = "【基礎】" & range("A27").text & range("A28").text
range("A30").value =file_nm
range("A1:A24").formulaR1C1= "='D:\10基礎\[" & file_nm & ".xls]基礎'RC"
End Sub

A27 と A28 には日付に関する数値が入っています。
A27＝０５　　（５月）
A28＝０６　　（６日）
そして、日付を変更しながら日次データ更新をする予定です。
しかし、問題は空白はゼロ表示になってしまいますので、
これを空白にして表示させたいのです。
どうぞお力を貸して頂ければ幸いです。