Rachel, in the below code "remarks" is being written to both sheet1 and sheet2.
If this post helps click Yes
---------------
Jacob Skaria
"Rachel" wrote:
> Hi Jacob,
>
> Thank you for this, but how can I modify the code in such a way that REMARKS
> is reflected on two worksheets? THANKS! Sorry newbie on macro
>
> Rachel
>
> "Jacob Skaria" wrote:
>
> > Rachel,
> >
> > Try something like..Adjust to suit your requirement/
> >
> > Dim ws1 As Worksheet, ws2 As Worksheet
> > Set ws1 = ActiveWorkbook.Sheets("Sheet1")
> > Set ws2 = ActiveWorkbook.Sheets("Sheet2")
> >
> > 'Sheet1. Assuming remarks is to be in Col A
> > ws1.Range("B" & ActiveCell.Row) = "Remarks"
> >
> > 'Sheet2.Check for the code in ColA and if exists get the row number
> > If WorksheetFunction.CountIf(ws2.Range("A:A"), "code") > 0 Then
> > lngRow = WorksheetFunction.Match("code", ws2.Range("A:A"), 0)
> > 'Write remarks in ColB
> > Range("B" & lngRow) = "Remarks"
> > End If
> >
> > If this post helps click Yes
> > ---------------
> > Jacob Skaria
> >
> >
> > "Rachel" wrote:
> >
> > > Help! I need a macro code in such a way that when you type a word in a
> > > USERFORM it reflects the word typed on that form in 2 seperate worksheets
> > > (database) wherein it is linked to the same details.
> > >
> > > To elaborate, I have 3 worksheets. Worksheet 1 contains LOOKUP function
> > > wherein you search for a particular reference code then it appears. You then
> > > click on that reference code and a userform pops out with a box for REMARKS.
> > > Is there a code which I can use so that the remark entered into this box is
> > > reflected in worksheet 2 and 3 which is a database that contains a list of
> > > different reference codes but the remarks will have to be placed on the
> > > particular reference code that was looked up in worksheet 1. THANKS!
|
Similar Threads
