I tried the following code but it does not work. In the range ("W2") I have the following ranges:
A1: G60, A61: G119, A12: G178, A179: G237, A238: G296, A297: G355, A356: G414, A415: G473, A474: G532, A533: G591
Does anyone have an idea?
Dim Imprimir like a string
imprimir = Application.Sheets ("Sheets2"). Range ("W2"). Value
Sheets ("Sheets1"). Range (imprimir) .ExportAsFixedFormat Type: = xlTypePDF, Quality: = xlQualityStandard, IncludeDocProperties: = True, IgnorePrintAreas: = False, OpenAfterPublish: = True
thanks
source share