目安箱 IV

目安箱投稿のルールはこちらをごらんください。
ご意見は電子メールで承っています。
「目安箱」は質問禁止です。技術的な質問はそれぞれの質問箱へどうぞ。

迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃ホーム  
3 / 109 ツリー ←次へ | 前へ→

【56】マクロで作るコマンドバー、ツールバー Jaka 04/8/2(月) 10:32 Excel[未読]

【281】今更ながら。 Jaka 15/8/6(木) 12:25 Excel[未読]
【284】Re:今更ながら。 ヒラタ 17/6/14(水) 3:03 Access[未読]

【281】今更ながら。
Excel  Jaka  - 15/8/6(木) 12:25 -

引用なし
パスワード
   誤字だらけやん。
10年たってから気づきました。
すみません。
他にもありそうな気が・・・。

>  PtWd = InputBox("ボタンに持たせる引数(数字のみ)を入力してください。", "引数入力", , XPos:=横位置, YPos:=縦位置)
>  If PtWd = "" Then
>    MsgBox "引数なし 終了"
>    Exit Sub
>  ElseIf Not IsNumeric(PasWd) Then
>    MsgBox "数字だけです。 終了"
>    Exit Sub
>  End If


ElseIf Not IsNumeric(PasWd) Then
  ↓
ElseIf Not IsNumeric(PtWd) Then

【284】Re:今更ながら。
Access  ヒラタ  - 17/6/14(水) 3:03 -

引用なし
パスワード
   ▼Jaka さん:
>誤字だらけやん。
>10年たってから気づきました。
>すみません。
>他にもありそうな気が・・・。
>
>>  PtWd = InputBox("ボタンに持たせる引数(数字のみ)を入力してください。", "引数入力", , XPos:=横位置, YPos:=縦位置)
>>  If PtWd = "" Then
>>    MsgBox "引数なし 終了"
>>    Exit Sub
>>  ElseIf Not IsNumeric(PasWd) Then
>>    MsgBox "数字だけです。 終了"
>>    Exit Sub
>>  End If
> 
>
>ElseIf Not IsNumeric(PasWd) Then
>  ↓
>ElseIf Not IsNumeric(PtWd) Then


ご情報ありがとうございます。


yaplog.jp/hotbags/

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃ホーム  
3 / 109 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:   
0
(SS)C-BOARD v3.8 is Free