I have written a bit of a macro to email the active sheet in an excel (as
below).

I want the marco to look at cell A29 in the sheet and use the value that is
in that cell as as the recipient email address. However not sure how to do
that??

Would appreciate any feedback.

Thanks

James

Sub Mail_ActiveSheet_Outlook()
Columns("A:I").Select
Selection.Copy
Columns("A:I").Select
Selection.EntireColumn.Hidden = False
Range("A1:I26").Select
Application.CutCopyMode = False
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Columns("A:I").EntireColumn.AutoFit
Range("A1").Select
Application.CutCopyMode = False
Application.Dialogs(xlDialogSendMail).Show _
arg1:=A29, _
arg2:="Bizlink Quartile Report"
ActiveWorkbook.Close
Range("A1").Select
End Sub