Re: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem
Hi guys, thank you very much for your help. You solved my problem and thank you for different posibilities from which I can learn. Best regards, seba On 10 nov., 18:21, Sam Mathai Chacko wrote: > Two options try > > If Not IsEmpty(Range("A1")) Then > Range("B5").Value = 8 > Else > Exit Sub > End If > > *OR* > > If Len(Trim(Range("A1"))) Then > Range("B5").Value = 8 > Else > Exit Sub > End If > > Regards > > Sam Mathai Chacko > > > > > > > > > > On Thu, Nov 10, 2011 at 10:13 PM, dguillett1 wrote: > > you forgot RANGE but to make sure try > > > If len(application.trim(range("**A1")))<1 Then > > > Don Guillett > > SalesAid Software > > dguille...@gmail.com > > -Original Message- From: Seba > > Sent: Thursday, November 10, 2011 9:48 AM > > To: MS EXCEL AND VBA MACROS > > Subject: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem > > > Hi, > > > I am testing this fairly simple code for some other purposes but I > > always get the value 8 regardless of value in A1: > > > --**--** > > Sub testPogoja() > > If IsEmpty("A1") Then > > Exit Sub > > Else > > Range("B5").Value = 8 > > End If > > End Sub > > --**--** > > > I also tried > > > Sub testPogoja() > > If IsEmpty("A1") = True Then > > Exit Sub > > Else > > Range("B5").Value = 8 > > End If > > End Sub > > --**--** > > > > > and no luck. > > What am I doing wrong? > > > regards > > seba > > > -- > > FORUM RULES (934+ members already BANNED for violation) > > > 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) Cross-promotion of, or links to, forums competitive to this forum in > > signatures are prohibited. > > > NOTE : Don't ever post personal or confidential data in a workbook. Forum > > owners and members are not responsible for any loss. > > > --**--** > > --** > > To post to this group, send email to excel-macros@googlegroups.com > > -- > > FORUM RULES (934+ members already BANNED for violation) > > > 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) Cross-promotion of, or links to, forums competitive to this forum in > > signatures are prohibited. > > NOTE : Don't ever post personal or confidential data in a workbook. Forum > > owners and members are not responsible for any loss. > > > --**--** > > --** > > To post to this group, send email to excel-macros@googlegroups.com > > -- > Sam Mathai Chacko -- FORUM RULES (934+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. -- To post to this group, send email to excel-macros@googlegroups.com
Re: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem
Two options try If Not IsEmpty(Range("A1")) Then Range("B5").Value = 8 Else Exit Sub End If *OR* If Len(Trim(Range("A1"))) Then Range("B5").Value = 8 Else Exit Sub End If Regards Sam Mathai Chacko On Thu, Nov 10, 2011 at 10:13 PM, dguillett1 wrote: > you forgot RANGE but to make sure try > > If len(application.trim(range("**A1")))<1 Then > > > Don Guillett > SalesAid Software > dguille...@gmail.com > -Original Message- From: Seba > Sent: Thursday, November 10, 2011 9:48 AM > To: MS EXCEL AND VBA MACROS > Subject: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem > > > Hi, > > I am testing this fairly simple code for some other purposes but I > always get the value 8 regardless of value in A1: > > --**--** > Sub testPogoja() > If IsEmpty("A1") Then > Exit Sub > Else > Range("B5").Value = 8 > End If > End Sub > --**--** > > I also tried > > Sub testPogoja() > If IsEmpty("A1") = True Then > Exit Sub > Else > Range("B5").Value = 8 > End If > End Sub > --**--** > > > and no luck. > What am I doing wrong? > > regards > seba > > -- > FORUM RULES (934+ members already BANNED for violation) > > 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) Cross-promotion of, or links to, forums competitive to this forum in > signatures are prohibited. > > NOTE : Don't ever post personal or confidential data in a workbook. Forum > owners and members are not responsible for any loss. > > --**--** > --** > To post to this group, send email to excel-macros@googlegroups.com > -- > FORUM RULES (934+ members already BANNED for violation) > > 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) Cross-promotion of, or links to, forums competitive to this forum in > signatures are prohibited. > NOTE : Don't ever post personal or confidential data in a workbook. Forum > owners and members are not responsible for any loss. > > --**--** > --** > To post to this group, send email to excel-macros@googlegroups.com > -- Sam Mathai Chacko -- FORUM RULES (934+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. -- To post to this group, send email to excel-macros@googlegroups.com
RE: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem
Hi Seba, You are missing a small thing.. I have made the required correction in your code. Sub testPogoja() If IsEmpty(Range("A1")) Then Exit Sub Else Range("B5").Value = 8 End If End Sub Best Regards,Kaushal Kumar > Date: Thu, 10 Nov 2011 07:48:10 -0800 > Subject: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem > From: sebastjan.hri...@gmail.com > To: excel-macros@googlegroups.com > > Hi, > > I am testing this fairly simple code for some other purposes but I > always get the value 8 regardless of value in A1: > > > Sub testPogoja() > If IsEmpty("A1") Then > Exit Sub > Else > Range("B5").Value = 8 > End If > End Sub > > > I also tried > > Sub testPogoja() > If IsEmpty("A1") = True Then > Exit Sub > Else > Range("B5").Value = 8 > End If > End Sub > > > and no luck. > What am I doing wrong? > > regards > seba > > -- > FORUM RULES (934+ members already BANNED for violation) > > 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) Cross-promotion of, or links to, forums competitive to this forum in > signatures are prohibited. > > NOTE : Don't ever post personal or confidential data in a workbook. Forum > owners and members are not responsible for any loss. > > -- > To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (934+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. -- To post to this group, send email to excel-macros@googlegroups.com
Re: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem
you forgot RANGE but to make sure try If len(application.trim(range("A1")))<1 Then Don Guillett SalesAid Software dguille...@gmail.com -Original Message- From: Seba Sent: Thursday, November 10, 2011 9:48 AM To: MS EXCEL AND VBA MACROS Subject: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem Hi, I am testing this fairly simple code for some other purposes but I always get the value 8 regardless of value in A1: Sub testPogoja() If IsEmpty("A1") Then Exit Sub Else Range("B5").Value = 8 End If End Sub I also tried Sub testPogoja() If IsEmpty("A1") = True Then Exit Sub Else Range("B5").Value = 8 End If End Sub and no luck. What am I doing wrong? regards seba -- FORUM RULES (934+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. -- To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (934+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. -- To post to this group, send email to excel-macros@googlegroups.com
Re: $$Excel-Macros$$ excel vba If IsEmpty(Range) code problem
try this... If range("A1").value = " " Then Exit Sub Else Range("B5").Value = 8 End If End Sub regards, Mrinal On Thu, Nov 10, 2011 at 9:18 PM, Seba wrote: > Hi, > > I am testing this fairly simple code for some other purposes but I > always get the value 8 regardless of value in A1: > > > Sub testPogoja() > If IsEmpty("A1") Then > Exit Sub > Else > Range("B5").Value = 8 > End If > End Sub > > > I also tried > > Sub testPogoja() > If IsEmpty("A1") = True Then > Exit Sub > Else > Range("B5").Value = 8 > End If > End Sub > > > and no luck. > What am I doing wrong? > > regards > seba > > -- > FORUM RULES (934+ members already BANNED for violation) > > 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) Cross-promotion of, or links to, forums competitive to this forum in > signatures are prohibited. > > NOTE : Don't ever post personal or confidential data in a workbook. Forum > owners and members are not responsible for any loss. > > > -- > To post to this group, send email to excel-macros@googlegroups.com > -- FORUM RULES (934+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. -- To post to this group, send email to excel-macros@googlegroups.com
$$Excel-Macros$$ excel vba If IsEmpty(Range) code problem
Hi, I am testing this fairly simple code for some other purposes but I always get the value 8 regardless of value in A1: Sub testPogoja() If IsEmpty("A1") Then Exit Sub Else Range("B5").Value = 8 End If End Sub I also tried Sub testPogoja() If IsEmpty("A1") = True Then Exit Sub Else Range("B5").Value = 8 End If End Sub and no luck. What am I doing wrong? regards seba -- FORUM RULES (934+ members already BANNED for violation) 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) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. -- To post to this group, send email to excel-macros@googlegroups.com