runtime

Hi I am trying to save the data into the MainInventory but unable to do as I keep getting this error When my sheet is empty and insert the second row as my first row is headers row the data is inserts fine everything works fine but as i enter the third row this pops ups and my vba closes and...

Hi all, I've pieced together the below code from other forums to achieve something I thought would be relatively simple, but it has thrown up an error which I'm not capable of solving. I have two ranges B44:E58 and H44:K58- products are listed starting at B44 with various details in the...

have the following code in my user form which uses a class module (not shown). It all works great, but I want to add the buttons dynamically according to a list in my worksheet and don't know how to use an array to dimension them. At the top of my user form I Dim the events references: Dim cbe1...

Hi all, For each cell in column B, I want to count how many cells in that column have the same value. If there is only one cell in the column with that value, change the Cell.Value to Cell.Value & "a", if there are two cells in the column with that value, change the Cell.Value to Cell.Value &...

I have this VBA, however, when I run it, it repeats until I get a runtime error. I am trying to get it to where it pastes the cell's value if it reaches over a text limit. The limit would be 20. This cell(A2) has a card scanned and pastes the values of the card in the cell, instead of clicking a...

I'm using the following formula in a cell =IFERROR(INDEX($A$1:$A$33,AGGREGATE(15,6,(ROW($A$1:$A$33)/(($B$1:$B$33>=$I$1)*($B$1:$B$31<$J$1))),ROWS($A$1:$A2)-ROW($A$1))),"") It works perfectly. If i enter the same formula in my vba code, I get run time error. How to correct it. In vba code i wrote...

Hello, I've been trying to retrieve some data from an Access database, but I'm getting the above error message followed by 'Syntax error in ORDER BY clause.' Sub LookIntoAccess() 'This macro opens the Database From Excess.accdb database, creates and runs an SQL query. 'Then, it copies...

Private Sub UserForm_Initialize() ComboBox1.Value = "Please Select an employee from the dropdown" ComboBox1.RowSource = "Sheet1!A3:A" & Range("A" & Rows.Count).End(xlUp).Row End Sub Why won't this code populate my combobox? It worked for the person in the YouTube video. Thank You

I am continously facing this problem runtime error 453.Please help to reslove.

Good morning I am adding controls at runtime to a userform. I have done this before and I cannot work out what I am doing differently this time. I can add the controls alright and I can add the event handler code in the form module programatically. The form loads alright but the event...

Hi all! I'm trying to activate the Microsoft Scripting Runtime Reference within my code as I'm using FSOs in other parts of the code. I don't get any errors, but it's not activating the reference either. The path below is my actual path. Any help is appreciated. Thanks in advance! Sub...

Getting the following error: Runtime error -2147417848 (80010108) Automation Error The object invoked has dicsonnected from its clients. <code><code> Set ie = CreateObject("InternetExplorer.Application") Application.ScreenUpdating = False If Sheets("Adrenalin").Range("C3").Value = "" Or...

Not the best or brightest using VBA but I've done this a 100 time before but now it's giving me grief. Keep getting runtime 1004 error. This is driving me crazy so any help would be appreciated. Thanks, Dim wc As Worksheet Set wc = Sheets("ABC") wc.UsedRange.Value = wc.UsedRange.Value

Trying to pass data from a form to a sheet...getting runtime error 1004 and have no idea why... Can someone take a look and tell me here I am going wrong? Private Sub cmdupdate_Click() Dim wsadd As Worksheet Set wsadd = Sheets("Historical") Dim Rw As Integer...

Hi guys. This is a strange one. A colleague of mine keeps getting a runtime error 9 whenever he tries to run a vba code. The code opens up a second workbook and looks to activate the relevant workbook when appropriate. The code is Sub NormalWeek62() TheFirst = 0...

Hi Everyone, I am getting a runtime error(runtime error 6 overflow) when selecting ALL cells in a worksheet. This sheet has a pop up calendar referencing cell J3. Debug shows the error in the second line of the code below. Any idea why? Thank you! Private Sub Worksheet_SelectionChange(ByVal...

Hi All I am applying a filter to a column where sometimes no data will be found (as expected). Can someone help with code to step past the 'Runtime 1004' error so the macro carries on? Thanks Selection.AutoFilter ActiveSheet.Range("$A$1:$Q$2000").AutoFilter Field:=13, Criteria1:=RGB(204 _...

Hello All, I am attempting to insert N number of rows based on N being inserted in cell "D7" Rows are to be inserted at A10, with the formatting (borders) extending to D10 This is the code i have so far but I keep getting the error message "Runtime error 1004 unable to set the weight...

Hello, I have a measuring device on 4 x machines which measures run time in minutes and metres of material run through the machines. The measuring device outputs the data into Excel but the format isn't great it displays as: Date, Time, Machine 1, Runtime Date, Time, Machine 1, Length Date...

I have an ActiveX listbox on my sheet. I have a number of sub routines that run once the user clicks an item in the list. My issue is that once a user clicks an item in the list, the listbox appears empty briefly while the code is running, and the items show back up when the code is done. This...