View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
feedscrn feedscrn is offline
external usenet poster
 
Posts: 2
Default reference, test and change cell font.

Hi All,

Excel VB is fun. I prefer MS C/C++, but I don't have the
compiler at work here... so....

I have the start of an Excel VB function... I would like to- via
a pushbutton to:
1. Test to see if the immediate left cell has strikeout font or
not.
2. If so, toggle to regular font.
2a. If regular font, toggle to strikeout.

This is for a timecard function... to say if the 'end time' is
tentative or not.

The pushbutton is set, with the basic structure. I don't know the
functions needed to reference, test or change the cell contents,
however :(

What I have so far, for a pushbutton in G10, is:
----------------------------------------------
Sub TempPermHrs()
Dim state As Integer // comment this out- how?
Set c = Range("F10")

End If
-----------------------------------------------

Thanks for any help,

Feedscrn


----------------------------------------------------------------------
When dinosaurs roamed the earth.. (hear the stomps in the background),
I started to learn Basic. I first learned some arcane commands: Peek
and Poke. That was enough to turn me off to the language for a long
time. VB is much more sophisticated now. It uses a 'DDEPoke Method'.
Everything is better now.. :-)
----------------------------------------------------------------------
Jesus Loves You ... John 3:16
----------------------------------------------------------------------