Search results

Thank you that worked!

Where can this be inserted? Maybe show me thanks.

life threw me a curve

fart on it then

Hello, Can there be a message popup if the file path isn't entered correctly? Then exit sub so the user can correct the file path. "Please correct the file path" Thank you for your help Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(Target...

Hi, I have office 365 and when editing my workbook the autosave to one drive sometimes isn't working. Does anyone know why and how to fix please? Thank you

I found a way but it might be a longer method: I recorded Macro 1 and called it at the end of this code Sub Macro1() ' ' Macro1 Macro ' ' Columns("A:A").Select With Selection.Font .Name = "Bookman Old Style" .Strikethrough = False .Superscript = False...

Hello, Can the font and size of the worksheet names from this code be: bookman old style and size 16 bold Thank you Sub ListSheets() Dim ws As Worksheet Dim x As Integer x = 3 Sheets("Menu").Range("A3:A20").Clear For Each ws In Worksheets Sheets("Menu").Cells(x, 1).Select...

Thank you so very much for taking the time to help me. Very valuable lessons learned today. Cheers!

Thank you for your help sir.

This was the code that does work after recording how Excel does the macro: Sub ProtectWorkbook() Dim wsheet As Worksheet For Each wsheet In ActiveWorkbook.Worksheets wsheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _ True, AllowFiltering:=True...

Wow I see how to record the macro. This is fantastic thank you so much.

Well I was wrong. The protection isn't doing what I expected. I want to be able to only select Unlocked cells on all sheets and also on the Invoice Payment sheet allow the slicers to function. Can this be done please?

I tried this and it worked: Sub ProtectWorkbook() Dim wsheet As Worksheet For Each wsheet In ActiveWorkbook.Worksheets wsheet.Protect DrawingObjects, AllowFiltering Next wsheet Range("F3").Select ActiveWorkbook.Save End Sub

Thank you but I don't know how to do the syntax in the code for these.

I have no idea what I am doing. I just try different ways to get the protection on the sheets that work the same as declaring in the ribbon. I need to allow select unlocked cells, allow autofilter, and allow drawing objects. These need to be in the VBA please. Thank you

What is wrong with my codes? I get errors on the drawing objects and autofilters. >>> use code - tags <<< Sub ProtectWorkbook() Dim wsheet As Worksheet For Each wsheet In ActiveWorkbook.Worksheets wsheet.Protect , DrawingObjects:=False, AutoFilter:=False Next...

Hello, I would like to protect all worksheets but some sheets have different criteria for protection. For instance some allow pivot table and pivot chart, sort, etc. Not all the same. Is there a macro that can handle this? Thank you very much

Hello, On the worksheet 'Stock Manager'. Is there a way to assign each "Go To >>" yellow shapes go to worksheet based on the column C sheet names? For instance cell B5 "Go To >>" link would go to sheet 'Item #1' cell B6. Then cell B6 "Go To >>" link would go to sheet 'Item #2' cell B6...

I figured out to add another column along side the Item # column and start number 001, 002, .....009, 010, 011 etc. This way I can sort this column and have the Item #1, Item #2 etc in order.

Hello, I have a list of items in a table that I want sorted but the numbers are not in order. Item #1 Item #10 Should be Item #1 Item #2 Why is this happening? Is there a way to get the order correctly? Thank you

Actually I like the formula method to check if it exists. Thank you very much. You are very creative coming up with that solution Mr. Bridges.

The If statement is red color in the VBA.

Actually could it check the list from the Invoice Payments sheet to see if the invoice number exists?

Thanks but it still allows duplicates on the Invoice Payments sheet. It also saves as PDF. I was looking for a way to not have a duplicate invoice created and recorded. This way only one copy of each invoice will be saved as PDF and only one line item on the Invoice Payments sheet for each...