Wait... just be clear...
Are you using RangeName1 as a variable that contains the name of a Named Range?
or is "RangeName1" the name of a range?
also, I can see why it might have a problem with:
Selection.SpecialCells(xlCellTypeFormulas, 16).Select
since I have no idea what that line is supposed to do!
Selection: means to consider the currently selected cells.
xlCellTypeFormulas is a cell type enumeration that is equivalent to -4123
and represents cells containing formulas
so you've got something like:
Selection.SpecialCells(-4123,16).Select
Which.. I'm not sure you can HAVE multiple values in SpecialCells()
I'm sure you're getting a Run-time error, and probably an Object Defined
Error...
But depending on what rangename1 is (variable or range)
it's probably not resolving THAT correctly.
The syntax:
If rangename2 = 16 Then
is comparing the VARIABLE called "rangename2" to the integer value 16.
Now, if you have a single cell in Excel and named it "rangename2"
then the proper syntax is:
if Range("rangename2").Value = 16 then
since you stated that you haven't done VBA in a while, you probably haven't
defined a Range object called rangename2 and set this Range Object to be a
specific cell.
in which case the "default" property of the range object is the Value property.
I don't like relying on defaults myself...
Paul
-----------------------------------------
“Do all the good you can,
By all the means you can,
In all the ways you can,
In all the places you can,
At all the times you can,
To all the people you can,
As long as ever you can.” - John Wesley
-----------------------------------------
From: deanalt via MS EXCEL AND VBA MACROS <excel-macros@googlegroups.com>
>To: excel-macros@googlegroups.com
>Sent: Monday, June 16, 2014 3:21 PM
>Subject: $$Excel-Macros$$ Re: If then
>
>
>
>Thanks Paul, but I tried this, I think, before posting. Even though
>rangename2 is 16, it is getting hung up on one of the steps that I expect it
>to take only if it is less than 16. Perhaps I need to declare that the
>rangenames are integers within the VBA macro, or something like that - do you
>think?
>
>
>For what it's worth, here's the row it hangs on:
>
>
> Selection.SpecialCells(xlCellTypeFormulas, 16).Select
>
>
>a row that I hoped it would not encounter at all, if the value is 16.
>
>
>Thx again!
>Dean
>
>
>On Monday, June 16, 2014 11:43:06 AM UTC-7, dea...@aol.com wrote:
>I've been gone for a long while and forgot some of what little I knew about
>proper VBA syntax. This is an easy one, I'm sure, so would someone kindly
>help me with the proper syntax on the if and goto statements? I'm getting
>things about end ifs without block ifs, etc. Thanks much, Dean. I want a vba
>subroutine in EXCEL that does the following - the range names are all positive
>integers less than or equal to 16:
>>
>>
>>sub
>>
>>
>>If rangename1 = 16 Then skip the next instruction, i.e., goto to 1000
>>'do some things that might not compute if it equals 16, so I don't want it to
>>see these things if 16
>>1000 'otherwise don't do anything but continue
>>
>>
>>If rangename2 = 16 Then skip the next instruction, i.e., goto to 2000
>>'do some things that might not compute if it equals 16, so I don't want it to
>>see these things if 16
>>
>>2000 'otherwise, don't do anything but continue
>>
>>
>>If rangename3 < 16 Then skip the next instruction, i.e., go to 3000
>>'do some things that might not compute if it equals 16, so I don't want it to
>>see these things if 16
>>
>>
>>3000 done
>>end sub
>--
>Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
>=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
>https://www.facebook.com/discussexcel
>
>FORUM RULES
>
>1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
>Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
>quick attention or may not be answered.
>2) Don't post a question in the thread of another member.
>3) Don't post questions regarding breaking or bypassing any security measure.
>4) Acknowledge the responses you receive, good or bad.
>5) Jobs posting is not allowed.
>6) Sharing copyrighted material and their links is not allowed.
>
>NOTE : Don't ever post confidential data in a workbook. Forum owners and
>members are not responsible for any loss.
>---
>You received this message because you are subscribed to the Google Groups "MS
>EXCEL AND VBA MACROS" group.
>To unsubscribe from this group and stop receiving emails from it, send an
>email to excel-macros+unsubscr...@googlegroups.com.
>To post to this group, send email to excel-macros@googlegroups.com.
>Visit this group at http://groups.google.com/group/excel-macros.
>For more options, visit https://groups.google.com/d/optout.
>
>
>
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
NOTE : Don't ever post confidential data in a workbook. Forum owners and
members are not responsible for any loss.
---
You received this message because you are subscribed to the Google Groups "MS
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
