Iván Martin Barrera

Estoy trabajando con la siguiente Macros Sub CommandButton1_Click() Dim i As Integer For i = 1 To Range("G" & 40).End(1).Row Hoja1.[C23] = Range("G" & i).Value Hoja1.Calculate ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\XXX\" &...