[ExcelVBA] Re: Sheet CommandButton becomes "crosshatched" and comatose.

 

Tim,

In its preference box it is called CommandButton. Adding annother button by: Developer>Controlls>ToolBox/Insert>ActiveX Controlls (that I must have used to place it originally) it appears to be an ActiveX CommandButton . It is the first choice in teh ActiveX section. There is just a button to click, no spin arrows.
(FWIW I never did understand the significance of ActiveX controls. I just try things and figure out how to use them...)

Here's an interesting turn of events that may give hints. As I looked around for more information on the CommandButton, I went into Design mode and right clicked the button. The resulting popup menu, among other things, had "CommandButton Object >". Selecting this showed "Edit". Selecting "Edit" then dismissed the popup and caused the SAME crosshatching! Try that...

Then, left clicking on the button removed the crosshatching.
Right clicking also removed the crosshatching and brought up the ppropriate popup menu.

Anything?...

Regards, Steve

--- In ExcelVBA@yahoogroups.com, Tim Lewis <tlewis@...> wrote:
>
> Steve, trying to get the same result, but I am not getting the same thing that you are seeing. The UserForm1.Sb... - are those spin buttons?
>
>
>
> From: ExcelVBA@yahoogroups.com [mailto:ExcelVBA@yahoogroups.com] On Behalf Of noskosteve
> Sent: Friday, June 28, 2013 12:57 AM
> To: ExcelVBA@yahoogroups.com
> Subject: [ExcelVBA] Sheet CommandButton becomes "crosshatched" and comatose.
>
>
>
> Maybe I should just take up knitting.
>
> Famous last words: Everything worked fine until...
>
> I have a Sheet1.CommandButton that normally brings up a UserForm for some preferences to be entered/changed by the user and works fine.
>
> I added a function which does not need these prefs. It's just a checkBox on Sheet3. When that function is activated, I bring up a message box indicating that the function must be disabled (unchecked) to see the Prefs' UserForm. Then, I exit the CommandButton_Click Sub without Showing the UserForm. Life is still good.
>
> Being the nice guy that I am, I figured it would be helpful to also automaticlly activate sheet3 which has the checkBox, so the user can easily un-check it and go back and see the UserForm to enter these prefs.
>
> Simply adding the Sheet3.Activate, causes the Sheet1.CommandButton to become crosshatched (when I reselect sheet1) in otder to to click it and enter the prefs.
> It is full of diagonal lines and unresponsive.
>
> When clicking the 'crossed-out' CommandButton, the crosshatch goes away, but it is now non-responsive. The Click Event does not fire the Click Sub.
> VBA doesn't appear to be paused or haulted in any way - other things work normally.
>
> Doing just about anything else that causes some other VBA code to execute then re-activates this catatonic CommandButton.
>
> Clicking the Reset button in the VBA window does not awaken the comatose CommandButton, nor change the title bar indicating VBA has changed modes (like going out of debug mode)
>
> FWIW here's the Click sub with the problem (near the end):
> ----------------------------------------------
> Private Sub PrefsButton_Click() ' Put filter prefs into Form
> Debug.Print "S_1 2 Filter Prefs Button Clicked. ";
>
> ' This sub is in Sheet1.
>
> ' Look at the ELSE for where the 'crosshatch' problem occurs...
>
> If Sheet3.Select_2000 Then ' The new function's CheckBox.
>
> ' All the stuff from here to the Else workes fine:
> ' Get Pref values into the UserForm
> ' SSB
> userform1.SB_Upper_Narrow = sheet1.Range("SSB_Narrow_Upper_Pref").Value
> userform1.SB_Upper_Mid = sheet1.Range("SSB_Mid_Upper_Pref").Value
> userform1.SB_Upper_Wide = sheet1.Range("SSB_Wide_Upper_Pref").Value
> ' ...
> ' There is more of the same kind of setting here, not shown.
> ' ...
>
> userform1.Show ' When execution get here, this works.
>
> Else ' Abort the filter settings form
>
> MsgBox "Filter settings from this sheet are only for the TS-2000. To change them, change the radio type to TS-2000 on the Memories sheet.", vbExclamation, " CAUTION CAUTION CAUTION"
>
> ' Now, Trouble. Activate the Memories sheet for the user to more easily make the change.
>
> Sheet3.Activate ' Adding this ONE line causes this CommandButton to become "crosshatched" when re-selecting Sheet1 !
>
> ' I've tried other things here like:
> ' End, or
> ' Reset, or
> ' PrefsButton.Activate to no avail.
>
> Exit Sub
> End If
>
> End Sub
> -------------------------------------------------
>
> Sigh, Steve
>
>
>
> [Non-text portions of this message have been removed]
>

__._,_.___

Reply via web post

Reply to sender

Reply to group

Start a New Topic

Messages in this topic (5)

Recent Activity:

• New Members 3

Visit Your Group

----------------------------------
Be sure to check out TechTrax Ezine for many, free Excel VBA articles! Go here: http://www.mousetrax.com/techtrax to enter the ezine, then search the ARCHIVES for EXCEL VBA.

----------------------------------
Visit our ExcelVBA group home page for more info and support files:
http://groups.yahoo.com/group/ExcelVBA

----------------------------------
More free tutorials and resources available at:
http://www.mousetrax.com

----------------------------------

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use • Send us Feedback

.

__,_._,___