Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 345
Default Font ColorIndex, Ws Change Event

Hi -
I'm building an App where the User's Wbk is referenced to an Addin.
A 'parm' sheet in the user's wbk has a sheet change event macro.

call MgrEdit(target.address) ' the edit macro is in the addin

Changing ONLY the font color of a cell does not seem to fire the change
event.
I'm looking for a way to crank up the edit immediately after the user clicks
the desired color in the standard palette.

It's a little screwy, but I need to edit the
cells(row,col).font.colorindex after I convert the $a$28 to row and col
values(which is working nicely).

I know that I can:
1. Ask the user to change the text value in the 'color' cell after
changing the color, but that also has a meaning in the app, and the user
would then have to change the text back to the 'really' desired text value.
Simple for me, but "klugy" to the user.

2. Build a macro that controls the font color selection and fire the edit
after the selection. 2a. Build another Menu entry the user would select
after changing only the font color of the cell. Both seem like overkill.

3. Edit the value when the 'next' macro is run by the user. Inconsistant
with the way the other cells are treated 'parm' sheet 'real' value
changes when the edit does fire on a change.

Is there a more straight forward way?

Thanks,
Neal Z.







--
Neal Z
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,986
Default Font ColorIndex, Ws Change Event

Hi Neal, try this scenario. Just before the user does anything:

x = ActiveCell.Font.ColorIndex
'Do your thing with the changes
If ActiveCell.Font.ColorIndex < x Then
'Do something, color has changed
Else
'Do nothing, color is the same
End If

"Neal Zimm" wrote:

Hi -
I'm building an App where the User's Wbk is referenced to an Addin.
A 'parm' sheet in the user's wbk has a sheet change event macro.

call MgrEdit(target.address) ' the edit macro is in the addin

Changing ONLY the font color of a cell does not seem to fire the change
event.
I'm looking for a way to crank up the edit immediately after the user clicks
the desired color in the standard palette.

It's a little screwy, but I need to edit the
cells(row,col).font.colorindex after I convert the $a$28 to row and col
values(which is working nicely).

I know that I can:
1. Ask the user to change the text value in the 'color' cell after
changing the color, but that also has a meaning in the app, and the user
would then have to change the text back to the 'really' desired text value.
Simple for me, but "klugy" to the user.

2. Build a macro that controls the font color selection and fire the edit
after the selection. 2a. Build another Menu entry the user would select
after changing only the font color of the cell. Both seem like overkill.

3. Edit the value when the 'next' macro is run by the user. Inconsistant
with the way the other cells are treated 'parm' sheet 'real' value
changes when the edit does fire on a change.

Is there a more straight forward way?

Thanks,
Neal Z.







--
Neal Z

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 345
Default Font ColorIndex, Ws Change Event

Hey JL-
Thanks. I think your suggestion is a variation on on my item 3, but it's
given me this idea.
1. Storing the color integers is easy, either hidden in the worksheet or
perhaps in a public array.
2. Unless this font color change is the LAST THING the user does on the
sheet(and I can trap it then on the de-activate event) he's gotta move the
cursor somewhere else on the sheet and I should be able to trap it on the
selection_change event.
I think this will work, 'cuz in the context of the application, there are
other things for the user to do after he/she does the color change.

Ya think ?
thanks

--
Neal Z


"JLGWhiz" wrote:

Hi Neal, try this scenario. Just before the user does anything:

x = ActiveCell.Font.ColorIndex
'Do your thing with the changes
If ActiveCell.Font.ColorIndex < x Then
'Do something, color has changed
Else
'Do nothing, color is the same
End If

"Neal Zimm" wrote:

Hi -
I'm building an App where the User's Wbk is referenced to an Addin.
A 'parm' sheet in the user's wbk has a sheet change event macro.

call MgrEdit(target.address) ' the edit macro is in the addin

Changing ONLY the font color of a cell does not seem to fire the change
event.
I'm looking for a way to crank up the edit immediately after the user clicks
the desired color in the standard palette.

It's a little screwy, but I need to edit the
cells(row,col).font.colorindex after I convert the $a$28 to row and col
values(which is working nicely).

I know that I can:
1. Ask the user to change the text value in the 'color' cell after
changing the color, but that also has a meaning in the app, and the user
would then have to change the text back to the 'really' desired text value.
Simple for me, but "klugy" to the user.

2. Build a macro that controls the font color selection and fire the edit
after the selection. 2a. Build another Menu entry the user would select
after changing only the font color of the cell. Both seem like overkill.

3. Edit the value when the 'next' macro is run by the user. Inconsistant
with the way the other cells are treated 'parm' sheet 'real' value
changes when the edit does fire on a change.

Is there a more straight forward way?

Thanks,
Neal Z.







--
Neal Z

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Event Macro adjustment needed - need to change font color also nick s Excel Worksheet Functions 2 November 28th 05 05:50 PM
Can't set font.colorindex from VBA Mike Jamesson Excel Programming 4 August 19th 05 02:20 PM
change font of certain cells in row(s) when ColorIndex of Column S changes KAS Excel Programming 4 March 24th 05 04:45 PM
If Font.ColorIndex = 5 then . . . jeremy nickels Excel Programming 2 March 4th 05 11:29 AM
Font and Fill ColorIndex Frank[_19_] Excel Programming 3 October 31st 03 01:52 PM


All times are GMT +1. The time now is 05:56 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"