Eu tenho uma planilha feita por mim em código VBA para o excel. Eu preciso transportar a mesma funcionalidade para o Google Planilhas. As funções que preciso reproduzir são Hiderow condionalmente, HideCollumn condionalmente e Hiperlink.
O código principal é esse.
Sub DM_Clique()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
ElapsedTime = Timer
Worksheets("Dados").Range("A:B")
.EntireColumn.Hidden = False
Worksheets("Dados").Range("C:AO")
.EntireColumn.Hidden = True
Worksheets("Dados").Range("ap:au")
.EntireColumn.Hidden = False
Worksheets("Dados").Range("av:xfd")
.EntireColumn.Hidden = True
Worksheets("Dados").Range("A3:IV4000")
.EntireRow.Hidden = True
For a = 3 To 4000
If Worksheets("Dados").Cells(a, 16).Value = "V" Then
Worksheets("Dados").Rows(a).Hidden = False
End If
Debug.Print Timer - ElapsedTime
Next
ThisWorkbook.Sheets("Dados").Activate
ThisWorkbook.Sheets("Dados").Range("a2").Select
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub
Delivery term: Not specified