アプリ版：「スタンプのみでお礼する」機能のリリースについて

「elseに対応するifがありません」と表示されます。

解決済

  • 質問者：agl-bt
  • 質問日時：
  • 回答数：1件

If Range("a2") > 0 Then GoTo saisyo
Else
End
End If
saisyo:
Range("a2").Select.Copy
Range("B2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
とすると、質問タイトルのエラーが出ます。何がいけないのでしょうか？

通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1ベストアンサー

  • 回答者： naktak
  • 回答日時：

Thenの後を改行させてないからです。


Thenの後を改行させなくて良いのは、1行でif文が完結する場合に限ります。
    • good
    • 0
    • 件
通報する
この回答へのお礼

無事解決しました。
　回答ありがとうございました。

通報する
お礼日時：2008/09/11 22:03

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

ページトップページトップ

Q質問する（無料）

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報