wks

i want to add IF condition in my macro.This condition need to merge in my code if E5= Random Value E6=Data List Validation (INPUT 1,INPUT 2,INPUT 3,INPUT 4) if E6=INPUT 1 ElseIf E6=INPUT 2 ElseIf E6=INPUT 3 ElseIf E6=INPUT 4 (CODE IS SAME ONLY FORMULAS ARE CHANGING IF INPUT 1 THEN THIS...

I created a clear all button on a sheet that needs to be cleared at the end of the year, ready for use at the start of the next year. The macro worked, but it also cleared out the table headings. (the names of each column) This was the macro I used: Sub ClearAllButFormulas() Dim wks As...

With Sheets("Model") For X = 5 To .Cells(5, Columns.Count).End(xlToLeft).Column If Len(.Cells(5, X).Value) > 0 Then On Error Resume Next Set wks = Sheets(CStr(.Cells(5, X).Value)) On Error GoTo 0 If wks Is...

Hi all, Appreciate any help to make below work: Private Sub CommandButton1_Click() Dim wks As Worksheet Set wks = Worksheets("FQF") With wks Select Case Frame1.ActiveControl.Name Case OptionButton1 'This is the name of the optionbutton...

Private Sub Workbook_V1_Open() Dim Wks As Worksheet For Each Wks In ThisWorkbook.Worksheets(1) Wks.Protect Password:="Engineer", UserInterFaceOnly:=True Next End Sub Private Sub protect_sheet() ActiveSheet.Protect Password:="Engineer", Drawing Objects:=True...

I have, on a weekly basis, a workbook having 60+ worksheets with each sheet named page1, page2, etc. I am renaming each sheet with the following code based on the contents of cell C5 in each sheet. The contents of cell C5 is a user name which should not be duplicated or changed on the worksheet...

Hello, I am creating a template for another team to track the time it takes to handle a case. This VBA macro is being added to a button for that individual to press to calculate the time. Here's what I have, Cell B2 has a starting date & time in this format "3/31/17 3:40 PM", cell E2 has an...

Hi, My worksheet does varying things which I have managed to get to work well. My only issue is getting the correct data into the correct amount of rows, I have managed to get the first 2 columns correct but then populating another column with data from a userform and adding the date is what I...

If I have images through B1:B10 and values in A1:A10, what's the best way to delete all images and left value whilst keeping all the values in C onwards to remain in the exact same place? I only want to delete adjacent cell if an image is there so something like this but this really messes up...