s Nothing Then
>>>
>>> Set Var = x.Offset(, 1)
>>>
>>> x.Offset(, 1).Copy
>>>
>>> Rg.Offset(, 2).PasteSpecial Paste:=xlPasteComments
>>>
>>> End If
>>>
>&
>
>> Next Rg
>>
>> End With
>>
>> End Sub****
>>
>> ** **
>>
>> Regards.
>>
>> Daniel
>>
>> ** **
>>
>> *De :* excel-macros@googlegroups.com [mailto:
>> excel-macros@googlegroups.
.Find(Rg.Value, , , xlWhole)
>>>
>>> If Not x Is Nothing Then
>>>
>>> Set Var = x.Offset(, 1)
>>>
>>> x.Offset(, 1).Copy
>>>
>>> Rg.Offset(, 2).PasteSpecial Paste:=xlPasteComments****
>>&g
t;>
>> End Sub****
>>
>> ** **
>>
>> Regards.
>>
>> Daniel
>>
>> ** **
>>
>> *De :* excel-macros@googlegroups.com [mailto:
>> excel-macros@googlegroups.com] *De la part de* Cab Boose
>> *Envoyé :* jeudi 7 juillet 201
End With
End Sub
Regards.
Daniel
De : excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] De
la part de Cab Boose
Envoyé : jeudi 7 juillet 2011 08:56
À : excel-macros@googlegroups.com
Objet : $$Excel-Macros$$ VBA Comment Box - Copy of
Hi
Have a photo in a comments box
Hi
Have a photo in a comments box in Database.xls. Also have a vlookup in
another workbook Shipment-New.xls to bring forward the text from the cell
into
the wb. This works great. I also want to bring forward the comment box
in the same cell from Database.xls into Shipment-New.xls.
Would li