[mso] Re: FW: Re: Another Excel VBA Question

Thanks so much for the help. This is on my list of things to attack
tomorrow at work.  I'm going to sit down and work my way through it and
understand it.   Today is supposed to be spent working on the intranet
site. Notice I said supposed to be.

Christine McDonald
Technical Specialist
Western Regional Office
Information Technology Division (RSA-4)

When a thing is done, it's done. Don't look back. Look forward to your
next objective.
George C. Marshall




-----Original Message-----
From: John Rischmiller [mailto:john@xxxxxxxxxxxxxxx]=20
Sent: Thursday, April 29, 2004 5:14 AM
To: mso@xxxxxxxxxxxxx
Subject: [mso] FW: Re: Another Excel VBA Question


Just to note my concerns about wrapping seem to have been confirmed,
try:

Sub FillWithFormula()
  Dim strLookupCell As String
  Dim strLookupRange As String
  strLookupCell =3D _
    InputBox("Enter lookup value cell (including $ if needed)")
  strLookupRange =3D _
    InputBox("Now enter lookup range of values")
  ActiveCell.Formula =3D "=3DIF(ISERROR(ERROR.TYPE(VLOOKUP(" _
    & strLookupCell & "," & strLookupRange & ",4,FALSE))),VLOOKUP(" _
    & strLookupCell & "," & strLookupRange & ",4,FALSE),
IF(ERROR.TYPE(VLOOKUP(" _
    & strLookupCell & "," & strLookupRange & ",4,FALSE))=3D7, 0, "" =
""))"=20
End Sub

Best regards, John


*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx
or MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to=20
mso-request@xxxxxxxxxxxxx with the word "unsubscribe" (without the
quotes) in the subject line.

Or, visit the group's homepage and use the dropdown menu.  This will
also allow you to change your email settings to digest or vacation (no
mail). http://www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group,
send a request to mso-moderators@xxxxxxxxxxxxx and you will be sent an
invitation with instructions.  Once you are a member of the files group,
you can go here to upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************
*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx with the word "unsubscribe" (without the quotes) in 
the subject line.

Or, visit the group's homepage and use the dropdown menu.  This will also allow 
you to change your email settings to digest or vacation (no mail).
http://www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a 
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with 
instructions.  Once you are a member of the files group, you can go here to 
upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************

Other related posts: