Comentários dentro do código são notas ou informações que podem ser incluídas para descrever o que desejar. Esses comentários não afetam o código ou programa que for executado. Tem por objetivo ajudar o programador a organizar o código.
Comentários simples em Visual Basic
Para fazer esse tipo de comentário, basta utilizar aspas simples e digitar o comentário. Pode ser usado acima do código, ou depois do mesmo. Ex:
'Seleciona célula B3
Range("B3").Select
With Selection.Font
.Name = "Calibri" 'Troca a fonte para calibri
.Size = 18 'Muda o tamanho da fonte para 18
.HorizontalAlignment = xlCenter 'Alinha o texto da célula no centro
O texto escrito em verde é o comentário, e este não afeta o código.
Comentários em múltiplas linhas no VB
Infelizmente o Visual Basic não dispõe desse recurso. Porém, existe um "truque" que pode ser utilizado para este fim.
A ideia é você criar blocos #If com expressões que não existem, fazendo o compilador desconsiderar o que estiver dentro desse bloco #If.
Veja um exemplo.
Range("E20").Select
#If comentario Then
Selection.Font.Size = 28
#End If
With Selection.Font
.Color = -16776961
Selection.Font.Bold = True
End With
Tudo o que estiver dentro do bloco #If - no exemplo acima, o código em verde - é ignorado.
Comentários simples em Visual Basic
Para fazer esse tipo de comentário, basta utilizar aspas simples e digitar o comentário. Pode ser usado acima do código, ou depois do mesmo. Ex:
'Seleciona célula B3
Range("B3").Select
With Selection.Font
.Name = "Calibri" 'Troca a fonte para calibri
.Size = 18 'Muda o tamanho da fonte para 18
.HorizontalAlignment = xlCenter 'Alinha o texto da célula no centro
O texto escrito em verde é o comentário, e este não afeta o código.
Comentários em múltiplas linhas no VB
Infelizmente o Visual Basic não dispõe desse recurso. Porém, existe um "truque" que pode ser utilizado para este fim.
A ideia é você criar blocos #If com expressões que não existem, fazendo o compilador desconsiderar o que estiver dentro desse bloco #If.
Veja um exemplo.
Range("E20").Select
#If comentario Then
Selection.Font.Size = 28
#End If
With Selection.Font
.Color = -16776961
Selection.Font.Bold = True
End With
Tudo o que estiver dentro do bloco #If - no exemplo acima, o código em verde - é ignorado.
Comentários
Postar um comentário