LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,117
Default WorkSheet_Change code from a CommandButton

thanks!
susan

On Mar 29, 9:14 pm, Mark Dullingham
wrote:
Sorry for the delay, I stopped get reply notification for this post and only
came accross you post today.

Basically the Command button code lives in the Userform Module and the
Worksheet_change sub stays in the worksheet object



"Susan" wrote:
can you post it (the solution) please?
thanks
susan


On Mar 11, 10:34 pm, Mark Dullingham
wrote:
Figured it out now!


"Mark Dullingham" wrote:
I have this bit of Code (thanks Dave Peterson) that normally resides in my
worksheet


Private Sub CommandButton1_Click()
Range("b6:b150").Select
Selection.Replace what:="??", _
Replacement:=Cells("5", "b").Value, _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
MatchCase:=False
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)


Dim myRow As Long
Dim myRng As Range


If Target.Cells.Count 1 Then Exit Sub
myRow = Target.Row


If Application.Intersect(Range("b5:B150"), Target) Is Nothing Then
Exit Sub
End If


Set myRng = Me.Range(Cells(myRow, "D"), Cells(myRow, "y"))


'stop the change from firing this event
Application.EnableEvents = False
myRng.Replace what:="L??O???", _
Replacement:=Me.Cells(Target.Row, "a").Value, _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
MatchCase:=False


Target.Select
Application.EnableEvents = True


End Sub


What I wouls like to do is have a CommandButton on a Userform do the same
thing.


I have tried copying various bit of it and all of it into the userform
module but with limited sucess. The second part of the code doesn't work as
it's no longer part of the worksheet.


Does anyone have any ideas


Thanks in advance


Mark- Hide quoted text -


- Show quoted text -- Hide quoted text -


- Show quoted text -





 
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
Pressing a CommandButton on a Userform via Code Corey Excel Programming 5 January 19th 07 03:28 PM
CommandButton code help peter.thompson[_66_] Excel Programming 3 January 23rd 06 01:32 AM
? activate a commandbutton in code ? tad_wegner[_6_] Excel Programming 1 October 10th 05 04:43 PM
CommandButton Code oberon.black[_58_] Excel Programming 3 September 16th 05 04:59 PM
Can You Change A CommandButton Code Using A Macro? Donna[_7_] Excel Programming 4 February 11th 05 08:38 AM


All times are GMT +1. The time now is 03:45 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"