Ir para conteúdo
Fórum Script Brasil

Dayana Bayma

Membros
  • Total de itens

    1
  • Registro em

  • Última visita

Sobre Dayana Bayma

Dayana Bayma's Achievements

0

Reputação

  1. Eu fostaria de usar a seguinte acionar a seguiente função PICompDat(tag,Data início,Dat Fim,8,"""",""inside"")" através de uma macro. Utilizei o gravador de macro e obtive o seguinte código: Sub PI_COMPDAT() Sheets("PI").Select Range("B2:B366").Select Selection.FormulaArray = _ "=PICompDat(PI!R1C2,PI!R2C1,PI!R366C1,8,"""",""inside"")" End Sub Mas eu gostaria que o cálculo fosse feito para as outras colunas, além da coluna B. E tentei isso: Sub PI_COMPDAT() ' Dim colunafim As Integer Dim i As Integer Sheets("PI").Select colunafim = Range("A1").End(xlToRight).Column For i = 2 To colunafim Range(Cells(2, i), Cells(366, i)).Select 'Erro está aqui Selection.FormulaArray = _ "=PICompDat(PI!Cells(1,i),PI!Cells(2,1),PI!Cells(366,1),8,"""",""inside"")" Next i
×
×
  • Criar Novo...