Broken Worksheet

JLouis

Active Member
Joined
Jan 1, 2004
Messages
295
Office Version
  1. 365
Platform
  1. Windows
I previously had this WB working and now it is broke. Not sure what I did, but userform9.label3 does not change to the activecell when selected in the worksheet. Would anyone have any thoughts on why this would occur? The msgbox shows the correct entry in the WS selection change event but a similar box shows blank in the WS calculation event.

Another note is that the userform updates correctly after making a 2nd selection on the WS. I need it to be immediate.

VBA Code:
Private Sub Worksheet_Calculate()
           UserForm9.Label3.Caption = Sheets("QB").Range("b522").Value

VBA Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Set rng = ActiveCell
MsgBox rng
Sheets("qb").Range("b522") = rng
 
Last edited:

Excel Facts

Can a formula spear through sheets?
Use =SUM(January:December!E7) to sum E7 on all of the sheets from January through December
I don't know how was your setup before but the code below should work:
VBA Code:
Dim ActiveRng As Variant
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  MsgBox Target
  ActiveRng = Target.Value 'or just ActiveRng = Target
End Sub
Private Sub Worksheet_Calculate()
  UserForm9.Label3.Caption = ActiveRng
End Sub
 
Upvote 0
Solution
Thanks for the reply. I'll give it a look when I have a chance. I appreciate your time.
 
Upvote 0

Forum statistics

Threads
1,214,068
Messages
6,117,522
Members
448,765
Latest member
crobehh

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top