唐沢俊孝 さん:

以下の、唐沢さんから僕への投稿がどう表示されているかご確認ください。
この ... の替わりに、例えば以下のように書くだけです。

Sub hoge()
Range("A4").Value = 3
End Sub

すると、こんな表示↓になります。

Sub hoge()
    Range("A4").Value = 3
End Sub

なんでしたら、試しに何か投稿してみていただいてもかまいません。
よろしくお願いいたします。

※まあ、「メリハリのついた表示になって見やすくなる」という以外にとくにメリットは無いかもしれませんが。


>小川様
>
>コメント・質問等(お気軽にどうぞ)の下に
>
>「プログラムのソースは

...

で囲っていただけると、以下のような表示になります。」
>とありますが、これはサブプロシージャの行に番号が付与されるということでしょうか。
>
>

...

で囲うとありますが、やり方がわかりませんので教えてください。
>
>
>

2014/10/30 16:50

小川慶一 様

ご教授ありがとうございます。
なるほどです！試しに
Sub test()
Range("A1").Value=5
Dim keisu
keisu=Range("A1").Value*4

Range("A3").Value=100
Range("A4").Value=200
Range("A5").Value=300

Range("B3").Value=Range("A3").Value*keisu
Range("B4").Value=Range("A4").Value*keisu
Range("B5").Value=Range("A5").Value*keisu
End sub

Sub test()
       Range("A1").Value=5
       Dim keisu
       keisu=Range("A1").Value*4
       
       Range("A3").Value=100
       Range("A4").Value=200
       Range("A5").Value=300
       
       Range("B3").Value=Range("A3").Value*keisu
       Range("B4").Value=Range("A4").Value*keisu
       Range("B5").Value=Range("A5").Value*keisu
End sub

書いてみました！




>唐沢俊孝 さん:
>
>以下の、唐沢さんから僕への投稿がどう表示されているかご確認ください。
>この ... の替わりに、例えば以下のように書くだけです。
>
>Sub hoge()
> Range("A4").Value = 3
>End Sub
>
>すると、こんな表示↓になります。
>
>

Sub hoge()
>    Range("A4").Value = 3
>End Sub

>
>なんでしたら、試しに何か投稿してみていただいてもかまいません。
>よろしくお願いいたします。
>
>※まあ、「メリハリのついた表示になって見やすくなる」という以外にとくにメリットは無いかもしれませんが。
>
>
>>小川様
>>
>>コメント・質問等(お気軽にどうぞ)の下に
>>
>>「プログラムのソースは

...

で囲っていただけると、以下のような表示になります。」
>>とありますが、これはサブプロシージャの行に番号が付与されるということでしょうか。
>>
>>

...

で囲うとありますが、やり方がわかりませんので教えてください。
>>
>>
>>
>

2014/10/31 09:49

唐沢俊孝 さん:

v(^^

>小川慶一 様
>
>ご教授ありがとうございます。
>なるほどです！試しに
>Sub test()
> Range("A1").Value=5
> Dim keisu
> keisu=Range("A1").Value*4
>
> Range("A3").Value=100
> Range("A4").Value=200
> Range("A5").Value=300
>
> Range("B3").Value=Range("A3").Value*keisu
> Range("B4").Value=Range("A4").Value*keisu
> Range("B5").Value=Range("A5").Value*keisu
>End sub
>
>

Sub test()
>       Range("A1").Value=5
>       Dim keisu
>       keisu=Range("A1").Value*4
>       
>       Range("A3").Value=100
>       Range("A4").Value=200
>       Range("A5").Value=300
>       
>       Range("B3").Value=Range("A3").Value*keisu
>       Range("B4").Value=Range("A4").Value*keisu
>       Range("B5").Value=Range("A5").Value*keisu
>End sub

>
>書いてみました！
>
>
>
>
>>唐沢俊孝 さん:
>>
>>以下の、唐沢さんから僕への投稿がどう表示されているかご確認ください。
>>この ... の替わりに、例えば以下のように書くだけです。
>>
>>Sub hoge()
>> Range("A4").Value = 3
>>End Sub
>>
>>すると、こんな表示↓になります。
>>
>>

Sub hoge()
>>    Range("A4").Value = 3
>>End Sub

>>
>>なんでしたら、試しに何か投稿してみていただいてもかまいません。
>>よろしくお願いいたします。
>>
>>※まあ、「メリハリのついた表示になって見やすくなる」という以外にとくにメリットは無いかもしれませんが。
>>
>>
>>>小川様
>>>
>>>コメント・質問等(お気軽にどうぞ)の下に
>>>
>>>「プログラムのソースは

...

で囲っていただけると、以下のような表示になります。」
>>>とありますが、これはサブプロシージャの行に番号が付与されるということでしょうか。
>>>
>>>

...

で囲うとありますが、やり方がわかりませんので教えてください。
>>>
>>>
>>>
>>
>

2014/11/01 17:37