Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
Solved

VBA Code

Posted on 2011-09-03
4
268 Views
Last Modified: 2012-05-12
Hello I have this code below, that is not working properly.  It my current set X37=0 and Y37=2, but it keeps putting the value of "P", when it should be "Y"  Any help would be greatly appreciated

If WS.Range("X37").Value >= 2 And WX.Range("Y37").Value >= 1 Then
    'Purple
    Range("B" & Cells(65536, "B").End(xlUp).Row + 1).Value = "P"
Else
    If WS.Range("X37") >= 1 Then
        'Red
        Range("B" & Cells(65536, "B").End(xlUp).Row + 1).Value = "R"
    Else
        If WS.Range("Y37") >= 1 Then
            'Yellow
            Range("B" & Cells(65536, "B").End(xlUp).Row + 1).Value = "Y"
        End If
    End If
End If
0
Comment
Question by:sandramac
  • 3
4 Comments
 
LVL 81

Accepted Solution

by:
byundt earned 500 total points
ID: 36479280
Looks like a typo in the first statement with WX.Range("Y37") instead of WS.Range("Y37")
0
 

Author Comment

by:sandramac
ID: 36479282
Thanks, the simplest things, I been studying so hard on it i overlook such a small thing
0
 
LVL 81

Expert Comment

by:byundt
ID: 36479285
sandramac,
Could you post your workbook? From your question, it doesn't seem possible that you would get a value of "P" so we will need to see the code in context with your layout.

Brad
0
 
LVL 81

Expert Comment

by:byundt
ID: 36479288
sandramac,
You can avoid typos like this if you use Option Explicit on every module sheet. You can set it up to be inserted automatically using the Tools...Options...Editor menu item (in the VBA Editor) and checking the box for "Require variable declaration"

Brad
0

Featured Post

Networking for the Cloud Era

Join Microsoft and Riverbed for a discussion and demonstration of enhancements to SteelConnect:
-One-click orchestration and cloud connectivity in Azure environments
-Tight integration of SD-WAN and WAN optimization capabilities
-Scalability and resiliency equal to a data center

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Introduction This Article is a follow-up to my Mappit! Addin Article (http://www.experts-exchange.com/A_2613.html), it was inspired by an email posting I made to EUSPRIG (http://www.eusprig.org/index.htm), I will briefly cover: 1) An overvie…
Approximate matching with VLOOKUP and MATCH seems to me to be a greatly under-used technique, and one which is vital for getting good performance out of large lookups. Until recently I would always have advised using an exact match for simplicity an…
This Micro Tutorial demonstrates how to create Excel charts: column, area, line, bar, and scatter charts. Formatting tips are provided as well.
This Micro Tutorial will demonstrate how to create pivot charts out of a data set. I also added a drop-down menu which allows to choose from different categories in the data set and the chart will automatically update.

860 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question