Recent content by Aeneas

I used to use a nifty piece of code in Excel 2003 that could add buttons to a custom button bar: Dim Magic8Ball As CommandBarButton Set Magic8Ball = CommandBars("MyButtonBar").Controls.Add(msoControlButton) Magic8Ball.FaceId = 1845 Magic8Ball.Style = msoButtonIcon Magic8Ball.TooltipText =...

Seems simple enough, but is there any way to create a hyperlink in a textbox?

What happens is it works. Wow, that's awesome. Thanks!

Why does: Sheets("Sheet1").Select Range("A1").Value = Sheets("Sheet2").Range("B2").Value work, yet: Sheets("Sheet2").Select Sheets("Sheet1").Range("A1").Value = Range("B2").Value does not work?

As always Skip, you have the simple and perfect answer. Thanks!

What I want to do is loop through all the shapes on a worksheet (for all worksheets in a workbook, I guess) and if they are textboxes, change some of the default formatting. I believe I have most of the code worked out, but am getting a runtime error that the object doesn't support being...

A1 formula: =5 B1 formula: =6 C1 formula: ="A1*B1" D1 formula: ? What sort of function could I put in D that would "execute" or "calculate" or "interpret" the C1 text into a formula that would return 30? I know how to do it in VBA, but is there a formula that would be like: =REFERENCE(C1)...

Crap -- it's: ActiveSheet.HPageBreaks(1).Delete Tried a whole whack of stuff, but this seems to work. When I tried this, I don't think I had HPageBreaks[1] set, so got a runtime error, but this works. Sorry for the waste of time.

This seems simple enough: ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell How about removing one. I don't want to reset all as in: ActiveSheet.ResetAllPageBreaks I just want to get rid of the one, like: ActiveSheet.HPageBreaks(1).Remove But this doesn't work. Any...

Brilliant! Never thought of using InStr, even though I referred specifically to it, but didn't know of Join function until now. Nice touch with the extra commas on the front and back to get a true independent find. Thanks so much!

Suppose I have made an array in VBA, something like: ShirtCols = array("red", "beige", "white", "black", "blue") MyCol = "pink" I want to see if pink is an acceptable shirt colour as per this array (perhaps representing what I have in my closet right now). I could do: for i = 0 to 4 if...

Right, right. I've used count before, just couldn't remember it and it was a while ago. You da man, Skip. Thanks!

I want to loop through a selection, looping through the columns and then the rows. "selection.rows" returns the array, which one can then tack on stuff like ".cells(1,1)" but how do I get the length of the array in rows and columns? Thanks in advance as I know this should be pretty easy.

Rob, in this situation, you can just exit sub in the main code, but here's another idea that perhaps can extend this "problem" to greater application: Private Function Check_Type(TestVar as Variant, Check as Boolean) Dim <variables> If TestVar Not <something> Then Check = True End If End...

Wow, this works. So simple. MS so butt-backwards sometime - TextBox object doesn't work, but Control object does. Anyway, aside from going into the details of my design, I have come across many instances where it would be useful to loop through controls without using 'for each ctrl in...