thanhvanchi
12-06-2016, 07:17 PM
Hello all member!
I found a way to copy with formatting and formulas; however, I just want the value.
wkb.Sheets("F100 Supportability").Range("A" & Target.Row).Copy Destination:=ws.Range("A1") 'Nomen
cwkb.Sheets("F100 Supportability").Range("O" & Target.Row).Copy Destination:=ws.Range("A2") 'PDN
cwkb.Sheets("F100 Supportability").Range("P" & Target.Row).Copy Destination:=ws.Range("A2") 'CNDM
cwkb.Sheets("F100 Supportability").Range("E" & Target.Row).Copy Destination:=ws.Range("D5") 'A
cwkb.Sheets("F100 Supportability").Range("F" & Target.Row).Copy Destination:=ws.Range("E5") 'F
cwkb.Sheets("F100 Supportability").Range("H" & Target.Row).Copy Destination:=ws.Range("B5") 'QDR
Does anyone know how I can copy just the value and paste it?
Thanks.
I found a way to copy with formatting and formulas; however, I just want the value.
wkb.Sheets("F100 Supportability").Range("A" & Target.Row).Copy Destination:=ws.Range("A1") 'Nomen
cwkb.Sheets("F100 Supportability").Range("O" & Target.Row).Copy Destination:=ws.Range("A2") 'PDN
cwkb.Sheets("F100 Supportability").Range("P" & Target.Row).Copy Destination:=ws.Range("A2") 'CNDM
cwkb.Sheets("F100 Supportability").Range("E" & Target.Row).Copy Destination:=ws.Range("D5") 'A
cwkb.Sheets("F100 Supportability").Range("F" & Target.Row).Copy Destination:=ws.Range("E5") 'F
cwkb.Sheets("F100 Supportability").Range("H" & Target.Row).Copy Destination:=ws.Range("B5") 'QDR
Does anyone know how I can copy just the value and paste it?
Thanks.