Retornar aos Exemplos de Códigos VBA
VBA – Determinar a Coluna Inicial e Final de uma Célula Mesclada
Aqui está um exemplo de código para determinar a coluna inicial e final de uma célula mesclada. Ele atribui o valor de cada coluna a uma variável e os retorna em uma caixa de mensagem.
Determinar as Colunas Inicial e Final de Células Mescladas
Public Sub InicioFimMesclada()
'Declarar as variáveis
Dim ColunaInicial As Integer
Dim ColunaFinal As Integer
'Atribuir variáveis
ColunaInicial = ActiveCell.Column
ColunaFinal = Selection.Columns.Count + ColunaInicial - 1
'Mostrar resultados
MsgBox "Coluna Inicial " & ColunaInicial
MsgBox "Coluna Final " & ColunaFinal
End SubCodificação VBA facilitada
Pare de procurar códigos VBA on-line. Saiba mais sobre o AutoMacro – um construtor de código VBA que permite que os iniciantes codifiquem procedimentos do zero com conhecimento mínimo de codificação e com muitos recursos que economizam tempo para todos os usuários!
