1. S

    Occasional runtime 1004 error

    Hi Folks, I'm running the below code...and it works fine...some of the time. Other times I get a runtime error but I can't figure out how to resolve it; any tips? The bit where I get an error is; For Each shp In ActiveSheet.Shapes If Not Intersect(Range(shp.TopLeftCell...
  2. B

    Last row in Dynamic Range

    I am attempting to retrieve the value found in the last cell/row in column E of a dynamic range. The first row containing data will always be E12 and the last row fluctuates on a daily basis. The formula I am using invariably returns the value found in E12 only - so I am obviously doing...
  3. S

    Run-time error '1004

    Hello Experts: I have a rather irritating problem that does not make sense to me and I am hoping that someone can help please. I have some code that: Creates a list of files to be opened Opens each file in the list and scrapes some specific data from each file opened if present Places the...
  4. S

    IFERROR formula

    Hi, Im working on a warehouse database with orders and quotes I have this IF formula =IF($B2="","",SUMIF(CheckOrderCommitted,B2, CommittedQuote)) But its giving me a $REF in all cells. This is because the cells reference too, Data is not in the cell., Im trying to do a IFERROR so that when...
  5. M

    "run-time error '-2147417848 (80010108)" - Selection.Insert Shift:=xlDown - Please Help!

    I have created a template for my work and the below Macro sometimes works, but sometimes crashes with the code "run-time error '-2147417848 (80010108)" When I go to debug, the highlighted section is Selection.Insert Shift:=xlDown - I cannot see an issue with this to be honest so any help would...
  6. K

    Macro-assigned button causes error

    I have a code that generates two new sheets based off of templates every time that it runs. I have a button that the macro is assigned to. When I click the button, it generates the first of the two sheets and then gives me an error 400 message. I go back, delete the sheet that was generated, and...
  7. J

    Error Handling Help

    I have what is probably a simple error handling issue for most of you but I can't seem to figure it out. I have an excel userform with multiple text boxes that auto populate via a vlookup. This all works fine except for one text box I can't seem to get the error handling right for. I need a...
  8. K

    Formatting help

    Hi, I have this problem with my excel in general: above sum should be 0. All decimals are exactly 2. Is there something i can correct in the formatting in my excel? Thank you in advance for your help.
  9. S

    Syntax errors

    Good Morning, Trying to compile a workbook, I keep getting a few errors. Here are the first two: Syntax Error: Function TotalAdder(RCell As Range) 'Begins Error Handling Code On Error GoTo Helper Dim xIndex As Long Application.Volatile xIndex = RCell.Worksheet.Index nsheet = Left(Tname...
  10. S

    Workbook Closing closes other open workbooks

    I have the code below in a workbook. When I close the workbook, it typically kills all other open workbooks of excel. However, excel has started opening a blank window (no loaded workbook) in a second window whenever opening any excel file. Anybody have ideas on both of these. Further, sometimes...
  11. B

    Power Query - Combine, transform and track data

    Hello All, As a reasonably seasoned excel user, im embarking on learning power query to try to achieve something which could quite well be impossible :) So hoping I can get some clarification from the real experts! Situation: I have a CSV file provided to me every day detailing a list of...
  12. W

    Runtime Error 13 in my code

    I am getting a run time error 13 in my code between the **. Can anyone out there see why? For some reason the code will run and do what I want, but then spit out the error. Any help will be appreciated. Sub Recon() Dim i As Integer finalrow =...
  13. K

    range error

    I'm new to VBA so be gentle. This just started happening today. Whenever I select a preexisting command button to a macro, I get an error window listing the range as "Wrong number of arguments or invalid property assignment" What can I do now? Sub clearswitchboard()...
  14. G

    On Error GOTO Quit

    On Error GoTo Quit: Quit: MsgBox ("Please Add Data to Template Sheet" _ & vbNewLine & "Then Run Program") Hello All, I have the above code. The On Error GoTo Quit is at the top of the code, with the Quit: at the bottom. The problem is my message box keeps popping up, even when no errors...
  15. R

    If Statement on date

    I currently have data in cell AS2396 "04/11/2019 10:49:09", this then gets formatted to in BM column to read "04/11/2019" using formula "=TEXT(AS2396,"dd/mm/yyyy") and the world is great. However, if no data is in column "AS" and say its in column "C", how can I add an if error to to select "C"...
  16. G

    Excel-Word Interop, Add Watermark Issue

    I have a workbook that will convert multiple word documents at once into PDF format. I am combining two macros I found on the web to try and get them to open a word doc, place a watermark on the doc, and then export it as a PDF. It will do this once for each file in a folder that I specify in...
  17. T

    Not seeing the syntax error

    I have the following formula that is giving me a #VALUE ! error and I've been looking at it so long I can't see where the syntax is wrong. Can someone please help? =IF(AND(Y17="Replacement2",Z8<3),"Wave "&'Project Data Sheet'!J73&" Print Order","Wave "&'Project Data Sheet'!B101&" Print...
  18. K

    'Next without for' compile error

    Hello - I have the following macro and it is hanging up with a "next without for" compile error. I don't see what is wrong with it? Could someone please help me? It is hanging up on the line 'Next mycell". Public Sub ProjNumbrReq() 'Call ProjNumbrReq Dim myCell As Range With...
  19. R

    Runtime Error 1004 - Using VLOOKUP in VBA (COMPLETED)

    Running a very basic test code to try out on a large amount of data, but having trouble, getting the "1004" error. Sub HugeSort() Dim c As Integer 'LOOPS THROUGH ALL ROWS For c = 2 To 10 If IsEmpty(ActiveSheet.Cells(c, 1)) = False Then ActiveSheet.Cells(c, 2) =...
  20. T

    Run Time Error 1004: Cannot save this workbook with same name as another open workbook or add-in.

    Hello - Anyone able to assist a newbie on VBA coding, please. I have learned some great stuff reading comments and watching online videos, etc. But, I have patched together some code from various excel experts to: 1. save the file and then email as an excel attachment (.xlsx) The issue...

Some videos you may like

This Week's Hot Topics