Sub PICKIN_RANGE_R1_Evento1()
Application.Trace"Disparou o evento RA"
If (Value=>1) then
Application.Trace"entrou no IF RA"
Application.GetObject(“HIST_R1”).WriteRecord()
End if
End Sub
Erro ao gravar um historico por evento na linha do WriteRecord()
Olá @eanjos,
Altere as aspas(" ") na linha do WriteRecord. Ao copiar e colar este script, é possível notar que as aspas deste trecho é diferente das demais das linhas anteriores:
Com as aspas alteradas:
Att,
Lucas Angelo