Visual Basic :: Change A Cell, Change The Worksheet

Looping Worksheet Change
Hello all!

I'm trying to write a unit conversion program in Excel. For example, Cell A1 says "meters" and cell B1 says "feet". Below them are the values used for conversion. Currently, I have a worksheet_change event that detects when one or the other values have been changed and goes ahead and converts the other to the appropriate units. Perhaps it would help if I pasted my code:

Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Row = 2 Then
If Target.Column = 1 Then
Target.Offset(0, 1).Value = Target.Value * 3.2808
ElseIf Target.Column = 2 Then
Target.Offset(0, -1).Value = Target.Value * 0.3048
End If
End If
End Sub

The problem is, when I enter a value for meters to be converted to feet, it has to change the cell for feet, which triggers the workseet_change detection again. This then changes the meters conversion and the loop continues until the last decimal finally itterates out. Does anyone know how I might be able to get this code to only run once, or at least not loop?

Thanks so much for the help!

- Aerosoob

Worksheet Change Event
Hi,
Just started learning Excel 2003 VBA and I am looking for some expert guidance!

I am trying to trigger a sub using the change event 'Worksheet_Change'. I want to trigger the sub when the value in cell A1 (for example) changes. The problem I am having is that change event works fine if I manually input a new value into A1 but doesnt work if I use a formula which changes value in A1 eg A1 = B1 x 2.

I have read every VBA book i can find but can not find anything that specifically resolves this.

Any help would be greatly apprecaited!!

Is There A Worksheet Name Change Event
I am trying to update a cells value based on the name of the worksheet. When the name of the worksheet is changed I would like the value in a certain cell to reflect automatically. Is there a worksheet name change event or can someone suggest a different way to accomplish this. thanks

Excel Worksheet Name Change
How can you tell if the name of a worksheet has been changed? Is there some type of event for this?

Worksheet Change Event
G'day all,

Here is my code so far:

Code:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Dim prioritiesAdd As Integer
prioritiesAdd = Application.WorksheetFunction.Sum(Range("A9:A18"))
If Not prioritiesAdd = 55 Then
Application.Goto Reference:="priority_for_results"
Selection.Sort Key1:=Range("A9"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("A7").End(xlDown).Offset(1, 0).Select
End If
End Sub
I want this sheet to sort the range of data ("A9:A18") while the entries in A9:A18 are not in the order of 1 to 10. My code is rather crude, as I am only sorting when the sum of these cells is not equal to 55 (i.e. 1+2+3+4+5+6+7+8+9+10=55). Does anyone know of a way to change this so it will only sort when this array in in ascending order? Or a thread that answers my question?

Thanks,

Mitchys

Worksheet Change Event
I had a worksheet change event that was causing problems cascading once another macro was enabled.

I therefore set application.enableevents = false to fix it.

I've since re-opened the file and now the event doesn't seem to work at all, even with the application.enableevents = false deleted.

I've changed quite a lot of the code elsewhere but nothing that specifically has to do with this command. Before I go unpicking everything to get at this one problem, I wondered if anyone knew anything about worksheet change events that may enable me to solve this a bit easier. For the record, here's the code with the enableevents setting left in:

Code:
Private Sub worksheet_change(ByVal target As Excel.Range)

'checks when every possible column is accounted for and sends the user back to the front screen
Dim bOK As Boolean
Dim ChkVal As Range
Dim i As Integer
Dim intlastcol_change As Integer

intlastcol_change = whtImport.Range("AT2").End(xlToLeft).Column

bOK = True

For i = 1 To intlastcol_change
Set ChkVal = Cells(1, i)
If IsEmpty(ChkVal) Then
bOK = False
Exit For
End If
Next i

If bOK Then
MsgBox "Header Record populated. Press OK to continue"
whtFront.Activate
Application.EnableEvents = False
Else
End If

End Sub
thanks

No Change Of Worksheet Names
Hello!

I need a help about the possibility to freeze the Names of the worksheets.
I need to project value to various sheets, but the index number change if a user change the order of the sheets, so I have to use the names of the sheets to control the projection of the values. I is possible to users can't change the names ?
The sheet can't be protected.

Thanks

PB

Restrict Worksheet Change
I'm using a form to add data to a worksheet. Once the user closes the form the data is added to the worksheet. I would like to restrict the user entry on the worksheet. Been playing around with Worksheet_Change and Worksheet_SelectionChange, but haven't quite got anything good yet. I'd like to notify them that changes aren't allowed and cancel the action, then maybe send them to a specified range.

Thanks in advance for the help.

Worksheet Change Event
Hi,

The worksheet change event looks really simple, but for some reason I just can't get it to work. I have a sheet called Sheet1 and I want a macro to run when I change the value in cell C4. Whatever I do I just can't get it to do anything.

Also, on a slightly different note, none of the properties/methods are showing when I type in the VB Editor. Even when I rightclick List Properties/Methods nothing comes up. It's making it really hard to do anything when I don't know the exact terms. Any ideas how I enable this?

Thanks!

Protect Sheet With Worksheet Change
I have a worksheet where I want users to be able to edit only certain cells. I know you can lock the cells and use protection, however that stops people from being able to autofilter which is important. I experimented with using the Worksheet_SelectionChange event to store the cell value and then Worksheet_Change to reset it if it is not in one of the allowable cells. This seems to work fine. However, the data in the sheet is also tied to a database which refreshes the data whenever the sheet is opened. Since all of the cells get changed during this refresh, the program seems to go into an infinite (or at least very long) loop.

My question is, is there a way to have the worksheet events only start working AFTER the initial refresh is done? Or does anyone have any other suggestions on a good way to do this?

Thanks

Worksheet In Excel Dosn't Change
I've created an application using VB6 on platform: windows XP (SP1), and office XP(v.10), the program uses Excel-vba. On my comptuer the application runs great.

but... after I took it and ran it over 2 other computers (after installation deployment), (OS: Windows 98(1st edition and 2nd edition), Office 97(v.8)), the program gave me an automation-error.

So, I've installed on the (1st edition 98) VB6, and ran the program. I ran my code line-by-line and saw that no changes are happening (except creating new Worksheet) in the excel, any how, no error has occured. Later then, I've upgraded on that copmtuer to Office-XP, and tried again to run my application through visual-basic using line-by-line, nothing still happens...

I've tried to create a new project on the comptuer and to check what's going with the Excel, none..., still nothing changes in the excel

Now, not only this, some times the VB6 just crashes on the win98 comptuer...

Any sugestions?

Worksheet Selection Change Question
I wanted to bold a few cells based on the result of another cell.  Specifically:

Column K holds a percentage that the user updates.  If that cell is greater than the corresponding cell in column P, I want a few cells to be bold. (same thing for columns ac and column w)

I created a procedure in the "worksheet_selectionchange" sub.  Basically, I have a Loop until - It works fine - however, when I go to print preview and back to the worksheet, it seems like it just keeps looping and does nto stop?  Any help would be greatly appreciated!!  Is there a way to use an after-update type of event of the specific cells?

Here is the code:

Dim P As Integer
P = 7

'changes color of font for overall tier and bonus dollars
Do

If (Cells(P, "k") <> "") Then
   If (Cells(P, "k") >= Cells(P, "ac").Value) Then

    Cells(P, "Af").Font.Bold = True
    Cells(P, "Ae").Font.Bold = True
    Cells(P, "Ad").Font.Bold = True
    Cells(P, "Ac").Font.Bold = True
    Cells(P, "z").Font.Bold = False
    Cells(P, "y").Font.Bold = False
    Cells(P, "x").Font.Bold = False
    Cells(P, "w").Font.Bold = False
    Cells(P, "s").Font.Bold = False
    Cells(P, "r").Font.Bold = False
    Cells(P, "q").Font.Bold = False
    Cells(P, "p").Font.Bold = False

   ElseIf (Cells(P, "k") >= Cells(P, "w").Value) Then
    Cells(P, "Af").Font.Bold = False
    Cells(P, "Ae").Font.Bold = False
    Cells(P, "Ad").Font.Bold = False
    Cells(P, "Ac").Font.Bold = False
    Cells(P, "z").Font.Bold = True
    Cells(P, "y").Font.Bold = True
    Cells(P, "x").Font.Bold = True
    Cells(P, "w").Font.Bold = True
    Cells(P, "s").Font.Bold = False
    Cells(P, "r").Font.Bold = False
    Cells(P, "q").Font.Bold = False
    Cells(P, "p").Font.Bold = False

   ElseIf (Cells(P, "k") >= Cells(P, "p").Value) Then

    Cells(P, "Af").Font.Bold = False
    Cells(P, "Ae").Font.Bold = False
    Cells(P, "Ad").Font.Bold = False
    Cells(P, "Ac").Font.Bold = False
    Cells(P, "z").Font.Bold = False
    Cells(P, "y").Font.Bold = False
    Cells(P, "x").Font.Bold = False
    Cells(P, "w").Font.Bold = False
    Cells(P, "s").Font.Bold = True
    Cells(P, "r").Font.Bold = True
    Cells(P, "q").Font.Bold = True
    Cells(P, "p").Font.Bold = True
   Else
    Cells(P, "Af").Font.Bold = False
    Cells(P, "Ae").Font.Bold = False
    Cells(P, "Ad").Font.Bold = False
    Cells(P, "Ac").Font.Bold = False
    Cells(P, "z").Font.Bold = False
    Cells(P, "y").Font.Bold = False
    Cells(P, "x").Font.Bold = False
    Cells(P, "w").Font.Bold = False
    Cells(P, "s").Font.Bold = False
    Cells(P, "r").Font.Bold = False
    Cells(P, "q").Font.Bold = False
    Cells(P, "p").Font.Bold = False
    End If
End If

    P = P + 1

Loop Until P = 38

Using Vb6 To Update Worksheet, Cannot Change Orientation To Landscape
I ran a macro to first get the syntax for changing orientation to landscape.

I then copied the code as below:

If I use original code:

With oexcel.activesheet.pagesetup
.orientation=xlLandscape
end with

It immediately exits the Do loop.

If I change the code:

oexcel.activesheet.pagesetup.orientation=xlLandscape
end with
I do not exit the do loop, but the page orientation does not change to landscape -- it remains in portrait.

Any help will be appreciated.

Thanks

Select Case In Vb6 To Change Excel Worksheet Header
Hi,

I am using vb6 and excel (although my excel is crap and my vb is beg.) to load a datagrid records into excel in order to print the records, as you can see on the code.
The datagrid is populated depending on the options I select from a combo box option values (users or departments, data coming from a db) and option buttons as fimishedoption, liveoption or alloption.
Now I need to have select case for headers on the bolded line whereby depending on the selection I make of the options above, my excel worksheet shows that header.

How can I do that, please?

Thank you.

VB Code:
Private Sub cmdPrint_Click() Dim rs As ADODB.Recordset Dim fld As ADODB.Field Dim XL As Object Dim x% Set rs = New ADODB.Recordset Set rs.DataSource = Me.grdSearch.DataSource Set XL = CreateObject("Excel.Application") With XL .Workbooks.Add .Calculation = xlCalculationManual .Visible = False .Worksheets("Sheet1").Activate For Each fld In rs.Fields x% = x% + 1 .Cells(1, x%).Value = fld.Name Next fld .Rows("1:1").Select .Selection.Font.Bold = True .Cells(2, 1).CopyFromRecordset rs .Cells.Select .Cells.EntireColumn.AutoFit .ActiveSheet.PageSetup.Orientation = xlLandscape .ActiveSheet.PageSetup.PrintTitleRows = "$1:$1" .ActiveSheet.PageSetup.CenterFooter = "Page &P of &N" [b].ActiveSheet.PageSetup.CenterHeader = "&""Arial,Bold""&12list of change request"[/b] .ActiveSheet.PageSetup.RightHeader = "&D&T" .ActiveSheet.PageSetup.CenterFooter = "Page &P of &N" .ActiveSheet.PrintOut .ActiveWorkbook.Close False .Quit End With Set XL = Nothing Set rs = Nothing End Sub

Change A Cell With Another
Hallo,

i want, when I click on a cell and then click on other cell, to exchange their contents and formats.

I have made pictures. Can someone help me with the code?

Change Cell Value
hi

i have a sheet that i recieve from another party, on this sheet i have 3 variables that i have to use, they are CAN, COM and PAS but i also have aother variables on this sheet that i have to manually change to COM as part of the report i produce.

these are all in one column (C) with a header row with an ever changing number of rows on a daily basis, my other issue is that some days the others codes i need changing to COM could change without notification, and this is where i am struggling, as i need to be able to convert anything other than COM, CAN and PAS to COM status.

i have struggled with the VB even after taking a course on it, although i did not feel that was very helpful, had nothing to do with the sheets i work with, and my instructor was not interested in what i needed from the course, so you help will be gratefully recieved

steve

Change Cell Value
I want to change a particular cell value in the DataGrid control, but I can't find the correct way to do it. I can get back a specific cell value but I can't set the value. Does anyone know how to do it?

Run A Macro On Cell Change
New at this but reasonably competent and have searched various threads & sites for 2 days and have it working but not in the proper fashion.

Using:
Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$A$1" Then
Application.EnableEvents = False
' Look to see if Value in Cell 1,1 changes from 0
If Target.Value >= 1 Then
' Call the Macro contained in Module1
Call UpdateSPCResults
End If
Application.EnableEvents = True
End If

End Sub

Works great if you actualy type into the cell and press Enter. The problem is that $A$1 is populated via a DDE Poke from another app based upon an event within that app and it appears that the Worksheet_Change object is blind to that type of change.

When I manually change the contents of $A$1 my macro fires fine and pulls a ton of info from the app that feeds $A$1 - just as I need it.

Have a bridge around it using a macro that just fires every 15 seconds to see if there is a change but it really is a waste of resources - and not the right way to do it.

Thoughts, direction, suggestions? Willing to do the work just don't know where else to look. Thanks

Change In Cell Value Triggers Sub
HI,
I am wondering if it is possible to get a procedure to trigger on an event of data changing in a specific worksheet cell.

Specifically, the user has a cell where they can enter in a percentage to increase or decrease a value across a spreadsheet. (markup or down of prices), however I want to build in a default so that if the percent entered is greater than 10%, the user has to verify they want to override the default max or min of 10%.

I was hoping to do this without having to add a textbox. Can I get Excel to trigger an event based on the change in value of a certain cell?

The Place

Change Cell Range Value
Hi guys,

I have this line in a loop and i want to increase the cell range number by one everytime i go through the loop.

x = Sheets("Main").Range(B27).Value

i.e Range (B28) and so on....

Thanks in advance

Excel Cell Change
Is there a way to trap the chage of a cell value while you are still in that cell. Right now I can only trap a cell change when the user leaves the cell.

My goal:

I am using an Excel WorkSheet with 2 sheets. If cell B1 on sheet 1 is a 0 then I must show sheet2 if cell B1 on sheet 1 is a 1 then I stay on the current sheet.

On Cell Change _Excel2000 VBA
I am having problem writing the write code that will delete other cells when the value of i cell changes. a column should have the values of a (Y) or N in it . if the value was (Y) , the user will not be able to edit other cells , but if the value was (N) he could edit cells . my problem is when the user first enter a( N ) and starts editing other cell , if he then changed this mind and inserted a (y) . how can I clear all cells edited before .

I have started the process and it works , but the problem is after the change in the cell value you have to go back and click to activate for the clearing to happen . I hope am making sense
Here is my code
[code]
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Select Case Target.Column
Case 3 To 3
If UCase(Me.Range("C" & Target.Row)) = "Y" Then
Me.Range("D" & Target.Row).Value = ""
Me.Range("F" & Target.Row).Value = ""

End Select

End Sub
[CODE]

Would appreciate any help
Thanks

Run Macro On Specific Cell Change
Is there a way to have a VB Macro run when a specific cell changes value ? I am able to have a macro run when a "sheet data change" takes place, but do not know how to isolate a specific cell to be watched, while ignoring any other changes to the sheet.

Thanks in advance for any help !!!

Change Cell To Show Value And Not Formula
I have a workbook that I have setup with dynamic information that changes daily. Each day has it's own sheet. There are 4 master sheets that get updated daily with new information. Right now it is setup to reference the master sheets to get values to use in the daily sheets. But I want to be able to keep a record of what happened on any particular day. Is there a way to change a cell to show the value instaed of the formula? I know you can copy and paste special>values. But I need something that can be run in a macro so I don't have to do this manually for every cell I want to change.
Thanks and if this doesn't make sense please reply and I'll try to clarify some more.

Formula To Change Cell Colour
Basicly I'm trying to make my excel sheet inform me when someone changes a value in certain cells. At the moment I am using the following formula,

=IF((B11 = StartUp!C6),"","Changed")

But what I would like to happen is for the cell that has been changed to actual change colour to say green. Is there anyway to do this using a formula? I know I can do it using VBA, but I'm not sure how to make the program check the sheet every time someone enters a cell value...

Cell Selection Change Event
I know I've been posting a lot. Thanks for all the help. I'm really just trying to build on all the previous help and I've been experimenting. Here is my scenario:

This is basically a form for people to make choices on. I have a list of boxes (outlined cells) going down column A with a description for each one in cell B. In the boxes I will have a code (say A,B,C,etc) with a white font. When the user clicks on one of the boxes it will make the code visible by changing the font to black and vice-versa. Here is my code:

Code:
Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveSheet.Unprotect

If Selection.Font.ColorIndex = 2 Then
Selection.Font.ColorIndex = 0
Else
Selection.Font.ColorIndex = 2
End If

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

End Sub

Now here's where I have issues; I have the worksheet protected with only the boxed cells unlocked. This way no one can change the form. However, I have the issues that:

1. The user can change the value in the box instead of just activating/deactivating the code.
2. If you click in a cell it will change the font color, but if you click again without moving first it will not change back
3. I would prefer that they can only select one box at a time, but presently they can drag down the list. I thought I could maybe put a row in between each box, but it still lets me select the locked cells that are in the middle of unlocked cells.

All help is appreciated. Thanks!

Change Workbook Name From Cell Reference
I have found some great solutions here to the problems I have encountered as a new VB user, but this one (despite hours of searching) has left me stumped. I receive daily purchase order forms (created in excel by me) that I copy/past data into two workbooks then save to a file and send on for system registration and invoicing. I have managed to automate a lot of this but I still cannot get round one problem.

Every book arrives with a different name, I can automatically create a new book with all data in it but Excel allocates the name i.e. 'Book 1.xls' and so on,therefore I can't link the cell to the next book and have to copy past or save as manually, from there on it runs by it's self. I would like to be able to name the book with a number generated from the main 'index.xls.' so I could have '101.xls', '102.xls' and so on. the number generation is not the problem, it is the allocating it as a File name without changing it myself, that has left me lost. All I can say is please, please help me!!!!!!!!! I'm sure this can be done.

Run A Macro Based On Cell Change
Hello
I am trying to automate the write dde object based on cell change vs. doing it with a button that runs the macro to write dde object. what happens when I run the following code is nothing, no error, no message. As you can see I am using a message prompt to verify something is happening instead of running the ddepoke command.

this is in sheet 1 and in previous attempts I have used If with Else If and End If, as well as Select commands. those would at least error out telling me that "something" was happening now there is truly nothing happening.

Thanks in advance for any input that can be offered.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range

' The variable KeyCells contains the cells that will
' cause a action when they are changed.
Set KeyCells = Range("$D$2:$D$4")

If Not Application.Intersect(KeyCells, Range(Target.Address)) _
Is Nothing Then
End If

If Target.Address = ("d2") Then _
'isosp = DDEInitiate("rslinx", "AdjTankPSI")
'DDEPoke isosp, "N84:250", Cells(2, 4)
'DDETerminate isosp
MsgBox "you just adjusted iso tank" & Target.Address & " has changed."

ElseIf Target.Address = ("d3") Then _
'poly1sp = DDEInitiate("rslinx", "AdjTankPSI")
'DDEPoke poly1sp, "N84:251", Cells(3, 4)
'DDETerminate poly1sp
MsgBox "you just adjusted poly tank 1" & Target.Address & " has changed."

ElseIf Target.Address = ("d4") Then _
'poly2sp = DDEInitiate("rslinx", "AdjTankPSI")
'DDEPoke poly2sp, "N84:252", Cells(4, 4)
'DDETerminate poly2sp
MsgBox "you just adjusted poly tank 2" & Target.Address & " has changed."

End If
End Sub

How To Change Excel Cell Color
I want to change the background color of a particular cell in Excel Sheet thro' the VB program. I have done the rest of the things in getting data written into an Excel sheet.

Please help

regards

varrey

Find Cell, Change Color
I am trying to come up with some code that will search for a certain value and change the color of the cell. It just seems so simple, but I am struggling on it. I have tried to record a macro and do it, but I dont think I am diong it right. Any suggestions?? Thanks guys!!

Function Won't Change Cell Values
This is driving me nuts!

As a macro in a module (SUB) this code works fine:

Range("H21:H24").Select
Selection.ClearContents

However in the SAME module it does not work in a Function, example

Public MyFunction(strIn as STRING) strOut as STRING
Range("H21:H24").Select
Selection.ClearContents

MyFunction="Yowsa"
End Function

The above function returns the string fine, but does NOT clear the cells specified, why not?

I should mention that this function is called from my worksheet.

Change The Colour Ofa Cell Dependent On Value
Hi All

I have a silly question. I want to be able to change the colour of a cell dependent on it's cell. I would use conditional formatting but I have 6 different outcomes. Eg

if itype in

1=blue
2=red
3=yellow
4=purple
5=pink
6=green

Please can anyone help me???

Cheers

Paul

Ms Flex Grid Cell Change
is there any event that is fired when a cell in an ms flex grid is changed?

Change FlexGrid Cell Color
Hello;
I searched forum about this problem but couldn't find enough answer for me.
I'm using flexgrid to show my result. I want to change cell fore color when my result failed .
I tried something like below

Code:
With Me.FlexGrid1
For i=1 to 10
if Result(i)<1 Then 'Result Failed
.SelRow=i
.CellForeColor=vbRed
.TextMatrix(i,1)=Result(i)
Else
.TextMatrix(i,1)=Result(i)
End If
next i
End With

Thanks

Change Cell Color In Flexgrid.
I want to change the color of each cell in a flex grid based on the value from the table.for example there are nine columns and 2 rows.each cell can get some value or the value 'F'.if it is 'F' i want green color, if it is sthg else I want red.grid1.cellbackcolor changes fro the whole row.pl suggest.

How To Change Allignment Of Vsflexgrid Cell
I am using flexgrid in my project.......
Numeric value by default conimg in cell left allignment
Can I Change Allignment of vsflexgrid cell..........then
how?
help..............

How To Read/change A Cell In A ADO Database?
Hello,

I am new to databases and I would like to know how I can read a single cell and also how to change the value.
I copied a program from a vb6 book and it works as it should but it doesn't let me read only a single value from a cell and neither let me change that value.

In an msflexgrid there is MyFlex2.TextMatrix(total, 0) = a$ and a$=MyFlex2.TextMatrix(total, 0)

Is the something simular for a datagrid on a MDI form?

Thanks,

Jossies

Change Color Of Cell In Datagrid
Hi all,

I have searched this forum but only similar information on MSFlexGrid is available. Could anyone provide hints on how to change color of cell in MSDatagrid?

Cell Change On Enter In Grid
Hi

How can i change the CELL when Enter is hit.
It should go to the next CELL if Enter is hit and if an Enter is hit on the last CELL then a ROW should be added and the cursor should be on the 1st cell of the next ROW, and
How to write in a perticular cell and on pressing backspace the characters should be deleted in that perticular cell..
how can i do that can someone pls help me its urgent..
pls help

Excel Cell Color Change
Hi there,

I was struggling all morning to get this condition happen in Excel.

Condition:
The user inputs 31/11/2003 as the Due Date of a task in cell A1.
As the time passes and 31st of November actually arrives, that A1 cell color becomes Red.

According to my basic knowledge in VB, a similar situation in a Form will look as like below. Now, hope you understand what I am saying.

VB Code:
Private Sub Form_Load()If (txtDate.Text < Date) ThentxtDate.ForeColor = vbRedEnd IfEnd Sub

I would be grateful if anyone can help me with a code in Excel similar that in the VB Code mentioned above. Yes, the code should run when the Excel sheet opens, just like in Form_Load.

Thank you very much.

How To Change The Colour Of A Cell In VBExcel
Ok guys, I'm sure this is damn simple, but I've been trying everything I can think of for about an hour and I haven't found out yet.

I have this code:

If Winner = 4 Then
Range("k8") = Range("k8") + 1
Cells(line, 10) = "W4"
End If

But I would also like the cell Cells(line,10) to be in blue. I want to change its colour to blue. How do I do this?
Please help me!!
Thanx in advance

Vba Excel Change Cell Color
Question 1
I'm trying to change MS Excel range of cells color to Red -> if any cell in the range has a number below 70.
trying different way but no result.

Question 2
how to make the word justify to center in the cell?

Your help is appreciated.

Change Color A Cell In A Grid In .NET
Hello everybody

I need your help.

How do to change the backcolor for a cell in a
datagrid???

Thanks for your time

Regards
Josep

Change Color A Cell Of Datagrid
Hello, good morning

How do for to change the color of a cell of datagrid??

Thanks
Josep

How To Change The Color Of A Cell In Flexgrid
hi, i have flexgrid with 5 columns -

"ProductName", "QuanitityOnhand", "UsedQuantity", "OrderQuantity" and "Order"
Row1 Folger Coffee 5 bottles 10 bottles 10bottles No
Row2 FrenchFry bags 1 bag 20 bags 0 bags Yes
Row3 Sugar 5 Cases 1 Case 0 Cases No

on flexgrid load event the values for column 5 - "Order" is all "no" , and when the user dbl_clicks on a row it changes to "yes".
i hav acheived so far ,i also want to colour the selected cell(2row, 5Col - in this case)

but the selection is made by dbl_clicking on a row (row2)

i dont want the entire selected row i just want (row2 , col5 ) ("yes") to be in redColor
-------------------------------------------------------------------------------------------------------------------------
Thanks for any help
Shiny