private sub worksheet

Hi, I am a VBA newbie. I have a macro that runs to update the first Monday of the the year, when the year is entered ( Monday dates). This is then used to populate an Excel list of every Monday in that year. It then locks the sheet so the dates can't be deleted. These dates are linked to Cell...

I have been trying to find a way to simplify this VBA code as it takes a little while to run currently. I want it to automatically unhide row 7 on sheet 07 through sheet 32 when cell J4 on the active sheet is higher than 0 and if it is 0 or less then hide the row on those sheets. then repeat for...

As I'm new to VBA I have tried following code which is working perfectly unless and until I delete some content in multiple cells of column B simultaneously. Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 2 Then If Target.Value = "Shares" Then Target.Offset(0, 1).Value =...

Hello, I'm trying to combine 2 worksheet_change codes and I can't seem to get it figured out. I'd really appreciate some help. Here are the 2 codes separately: Private Sub Worksheet_Change(ByVal Target As Range) Dim Oldvalue As String Dim Newvalue As String Application.EnableEvents = True On...

Hi, This is my first post, hope get this right. I am newish to VBA and have come up against problem (first of many no doubt). I have searched for an answer on the forums and Google but not finding one that works for me. I need to put multiple private subs in one work sheet but am unable to run...

Hi all, I have this code here that simply turns the cells to uppercase. [CODE][ Sub Turn_Uppercase() For Each x In Range("C3:H200") x.Value = UCase(x.value) Next End Sub /CODE] Does anyone know how would I adapt this code so that I can run in a sheet tab (Private sub...

Hi all, So this is a strange one and must be solved by using VBA. Any help is much appreciated. Plain and simple, when a numerical character is entered into a cell I want the result to add "Group " before the number. So if someone enters 100, the result is "Group 100". If the number has been...

Hi Guys The following code is supposed to pull in Evaluated values from one s/sheet ("Lookback.xlsm") to a different central s/sheet where the ID/Ref matches between the 2 s/sheets. Desired values within the row where the ID/Ref matches is then supposed to populate the central; s/sheet (where...