Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
This is killing me
All I want to do is to make sure every time there is a change in the combobox
all cells are updated, but it doesn't so I tried forcing it byreplacing and equal sign by an equal sign something like this: Sub UpdateWkbk() Dim sht As Worksheet Dim dashsht As Worksheet Application.ScreenUpdating = False Set dashsht = Worksheets("Dashboard") Set sht = Worksheets("Data") sht.Select alreadyupdate = True For i = 1 To 10 sht.Range("J8:U40").Replace What:="=", Replacement:="=", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _ ReplaceFormat:=False alreadyupdate = True Application.Volatile Application.SendKeys ("%XR") ' This is to execute a refresh of a UDF because is also not happening automatically. Next i dashsht.Select Application.ScreenUpdating = True End Sub However, this triggers the Combobox So I figure I work around it like this: Private Sub ComboBox1_Change() If alreadyupdated Then Exit Sub Else UpdateWkbk End If alreadyupdate = True End Sub Nothing is working I have ensured that in my options, I have set my calculation to automatic Calculation. -- If this posting was helpful, please click on the Yes button. Regards, Michael Arch. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Syntax or Something is KILLING Me | Excel Programming | |||
killing all procedures? | Excel Programming | |||
help me out with this - it's killing me.. | Excel Programming | |||
killing a sub from within an if statement | Excel Programming | |||
Killing Excel :) | Excel Programming |