Put this in the Profiles Research Check List worksheet
Code:
--------------------
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count 1 Then Exit Sub
If Target.Address < "$H$10" Then Exit Sub
If Me.Range("H10") < "" Then
With Sheets("Conditional Letter")
.Range("B13").Value = Me.Range("H9").Value
.Range("B14").Value = " " & Me.Range("H4").Value
.Range("B15").Value = Me.Range("H9").Value
.Range("B16").Value = Me.Range("H10").Value
.Range("B17").Value = Me.Range("H11").Value & ", " _
& Me.Range("I11").Value & ", " _
& Me.Range("J11").Value
End With
Else
With Sheets("Conditional Letter")
.Range("B13").Value = Me.Range("H4").Value
.Range("B14").Value = Me.Range("H9").Value
.Range("B15").Value = Me.Range("H8").Value & ", " _
& Me.Range("I8").Value & ", " _
& Me.Range("J8").Value
End With
End If
End Sub
--------------------
*How to Save a Worksheet Event Macro*
1. *Copy* the macro using *CTRL+C* keys.
2. Open your Workbook and *Right Click* on the *Worksheet's Name Tab*
for the Worksheet the macro will run on.
3. *Left Click* on *View Code* in the pop up menu.
4. *Paste* the macro code using *CTRL+V*
5. Make any custom changes to the macro if needed at this time.
6. *Save* the macro in your Workbook using *CTRL+S*
Dave;440161 Wrote:
hi guys , finaly I have the code working correctly now I have a
question on what is the best way to fire the macro. Ideally i will
like it to fire as soon as someone enters text in (Profiles Research
Check List").Range("H10"). But I do not know if this is possible. I
am open to any suggestions thanks again for all your help and sorry
for the bother!!


--
Simon Lloyd

Regards,
Simon Lloyd
'Microsoft Office Help' (http://www.thecodecage.com)
------------------------------------------------------------------------
Simon Lloyd's Profile: http://www.thecodecage.com/forumz/member.php?userid=1
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=121974