true

can someone help me ?? what code who runs first to my userform_initialize.. Private Sub adddata_Click() Dim wks As Worksheet Dim addnew As Range Dim addup(15) As Double Set wks = Sheet9 Set addnew = wks.Range("AG3").Offset(0, 0) If ecYes.Value = True Then...

Hi all, I have a worksheet that has multiple sheets of data, and i want to consolidate the data into 1 page of unique values. I have this code written but want to shorten it by using some loops for the copying and pasting. What my code does: 1) copies data from column "Project Name" and...

Hi all, What i am looking to do seems simple enough but i just dont have the expertise to figure out the VBA for it, any help would be greatly appreciated! I would like to evaluate a cell (B7) where if the value = "SUN" or value = "SAT" and then clearcontents of range B9:B37 if that value...

Can anyone help please, I have just added a picture vlookup into by spreadsheet that has now made the spreadsheet run so slow, some times I am waiting up to 15 seconds to move the cursor around the spread sheet. I have in 2 of my 20 or so VBA codes added the following, which did help speed it...

Hello All I am trying to import multiple sheets from a link, i currently do this by downloading all the file (28 files) and importing them to my sheet. I would like to have excel download right from the site and import into the sheet. I am currently able to download the 1 file into the sheet...

Hello friends, Hope all is well! The code below does work. it sends a sheet as PDF via Outlook. Please help me edit the code, so that it sends a sheet as PDF withOUT Outlook; but CDO. Your kind is needed and really appreciated in advance! Private Sub Email() Set OutApp =...

The following code will open the specific file I need: Sub OpenRoutingOpen12() Application.DisplayAlerts = False Application.ScreenUpdating = False Application.AskToUpdateLinks = False txtdate = Format(Now, "m_d_yyyy") & "%208am" Workbooks.Open...

Can anybody help me a bit here, I am trying cycle through a folder open each Workbook in turn find a value in column I on Cost sheet and then offset from that cell to column L , I’e 3 columns across. Then I need to change that cell value to 60. The code to cycle through the files and open them...

Hi All, I use the below code, will be reduced to smaller level, I am just making the rows hide, if the cell value is blank. Also, i was trying to save the file in a path, however when we click on Alt F11, it still shows this code. Private Sub Worksheet_Change(ByVal Target As Range) If...

Hi all, I pinched the below bit of code from somewhere, I can't remember where. It formats designated substrings within the cells you select manually, and works awesome. However, it requires me to manually type in all the substrings in VBA. I tried to change this to accept values from a range...

Hello everyone. I need some help on this one. I have a data set that is 12 rows x 16 columns. I am Trying to write code that will filter the Horizontal (Category) Axis Labels visible when I chart the data. I have code to filter the Legend Entries (Series) on the chart, but the X-axis seems to be...

Hi all, same kind of topic again. Going to start with a top-to-bottom list of nomenclature Super Automation - Main workbook which contains a list of newspapers and their requirements, houses all macro code Automation Hub - Where products are placed and ranked according to various criteria...

Hi everyone! Im new to the forum and macros. have been using excel for a long time but very basic stuff. decided to dive deeper and gave myself a mini project. the first step of the project, is to check whether a range in sheet 1 has any value, if true, then copy the range into sheet 2, else...

Hi. I have a problem. In the code provided below I have three conditions where if I were to have a value of 0 then it won't show up on the listview, but it still shows up regardless. The first two conditions work finely, but the third condition doesn't. The third condition is based on the value...

Hi there I'm having an issue with a VBA macro- the first half works, however the second 'rule' isn't (in bold type below). I've scoured the forums but can't find an answer. Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("C23")) Is Nothing Then Exit Sub...

Hello, I have the following formula in a cell: =IF(H2>O2,"x","") My understanding was that the "" would make the cell blank because the logic is FALSE, but that is not the case. When I test the formula with ISBLANK it results in FALSE when I'd expect it to be TRUE. This is causing issues...

Extremely large data set that will include the following information. Is there a simple method (formula) to provide the following summation (for a large data set,A1:A200, etc.)? <colgroup><col width="99" style="width: 74pt; mso-width-source: userset; mso-width-alt: 3620;"> <col width="64"...

i have 100,000 with about 15,000 lines that highlighted because there is a TRUE in and AND formula in the row. I just filtered for TRUE< then highlighted in Yellow fill. Now they want me to highlight the row immediately before the TRUE. I can't seem to replicate my AND formula . . thanks

this might be a a tricky one since not eveyrone here is famialr with ADP/Broadridge. Dim ws As Worksheet Dim tmp As Worksheet Dim acct As String Set ws = Sheets("Booking") Set tmp = ThisWorkbook.Worksheets.Add tmp.Activate On Error Resume Next...

So I currently have a userform setup to hide a bunch of columns, and then buttons to reveal sets of columns as I want to look at them. It works fine, here is a snippet of my code for reference: Private Sub UserForm_Initialize() Columns.EntireColumn.Hidden = False Rows.EntireRow.Hidden = False...