Hi Ashish,
Thank you very much.
Works fine, saved lot of time.
Thanks.
On Mon, Dec 17, 2012 at 7:11 PM, ashish koul wrote:
> Sub add_comment()
> Dim i As Long
> Dim x As String, found As Range
> Dim j As Long, k As Long
>
> For i = 2 To Sheets("Clients").Range("a1").End(xlDown).Row
> Se
Sub add_comment()
Dim i As Long
Dim x As String, found As Range
Dim j As Long, k As Long
For i = 2 To Sheets("Clients").Range("a1").End(xlDown).Row
Set found =
Sheets("Details").Range("a:a").Find(Sheets("Clients").Cells(i, 1).Value,
LookIn:=xlValues)
If Not found Is Nothing Then
j
Hi All,
Good Afternoon!!!
Can Somebody help me by giving a macro which can add comments based on a
cell value like,
In the attached workbook, sheet named 'Clients' I have a list of client
codes against which 'Details' sheet they have some requirements
in columns named 'Req.1' , 'Req.2', '