Hiperlink na célula selecionada
Enviado: Sex Mai 26, 2017 8:43 am
Senhores, bom dia!
No código abaixo uso para criar uma nova planilha referente a célula selecionada. Está funcionando perfeitamente!
Sub FazCópiaDePlanilha()
Dim nomePlan As String
nomePlan = ActiveCell.Value
Sheets("Modelo").Copy after:=Sheets(Sheets.Count)
ActiveSheet.Name = nomePlan
End Sub
Agora preciso que outra macro insira um hiperlink na célula que está selecionada linkando a planilha que acabou de ser criada.
Tentei usar o "ActiveSheet.Hyperlinks.Add Anchor:=" mais não consegui.
É possível?
Desde já agradeço!
No código abaixo uso para criar uma nova planilha referente a célula selecionada. Está funcionando perfeitamente!
Sub FazCópiaDePlanilha()
Dim nomePlan As String
nomePlan = ActiveCell.Value
Sheets("Modelo").Copy after:=Sheets(Sheets.Count)
ActiveSheet.Name = nomePlan
End Sub
Agora preciso que outra macro insira um hiperlink na célula que está selecionada linkando a planilha que acabou de ser criada.
Tentei usar o "ActiveSheet.Hyperlinks.Add Anchor:=" mais não consegui.
É possível?
Desde já agradeço!