vba error

Limited VBA conceptual understanding. Using Excel 2010 Binary file type. Attempting to modify three simple graphs (on same worksheet) by overriding scale minimums and maximums with cell references in same worksheet. Unfortunately, I am getting a VBA error that I have done some limited...

Hi I'm getting this error in the following formula: If I remove everything from below displayAlerts = false to above Application.DisplayFullScreen = False vba works fine... Private Sub Button6_saveClose() stopsaveTimer DisplayAlerts = False Worksheets("work record").Range("bp13").AutoFill...

Hi, I'm working on the code below and can't seem to figure out why I'm continually getting the application defined / object defined error. I had it working before and for some reason it's now giving me this error every time. The issue seems to surround the With Statement when the ".Pattern"...

Hi, I've transferred a vba workbook to a new computer. Everything worked fine on the old machine however on the new one the error "cannot find library or project" shows. I have a form within this workbook with code assigned to it. The form has several combo boxes that initialize on load...

What is wrong with this? I want to compare my values from a range to a single cell. My Value for Cell 22,2 is 4 Dim Cell, Result As String, I As Long For I = 3 To 17 If Cells(I, 2).Value > Cell(22, 2).Value Then Call Step2(" Error") Exit Sub

I have this code on my VBA to run a loop through my data so I can clean it up to leave just "Y" however i keep getting an error saying invalid next control variable reference. Not sure what to do. Thanks Dim RowOne As Long Dim RowTwo As Long Dim LR As Long With Sheet1...

Hi guys I have a section of code which looks through a section of data, finds it and copies it somewhere else. Essentially I have milliseconds running down the A column from 0 to 40000 - I want to pluck out numbers from what I type in a box in the Ca column. Dim x As Range, y As Range Set...

Hi, I I would to change the code below to save file as XLSM. When i do that I get message saying choose alternative file extension. Thank you.. Sub exportsheets() Dim wbNew As Workbook Dim rngTM As Range Dim strPath As String On Error GoTo Errorcatch Application.ScreenUpdating =...

Hi, The following code seems to work to fine, however at the end it says "subscript out of range" - please could you help? Much appreciated. Sub exportsheets() Dim wbNew As Workbook Dim rngTM As Range Dim strPath As String On Error GoTo Errorcatch Application.ScreenUpdating =...

Hi When I run the following code I get the 'Type Mismatch' error: The code works ok for the first export (in terms of saving in location), however will not work thereafter. Sub exportsheets() Dim wbNew As Workbook Dim rngTM As Range Dim strPath As String...

I have written some code to check test the case for cell value > 0.0007 and if it is true to delete that row and the 199 rows below. This works when the cell value is greater than 0.51, however when the cell value is between 0.0007 and 0.5 I get a runtime error. This is my code Sub...

Hello, Help with this would be much appreciated. I wrote a program that seeks out a specific string and modifies the format of it's cell once it is found. Sometimes the string will exist on the sheet and sometimes it won't. I need the program to keep running and do its job if the string isn't...

I have a code in excel to run through columns of names / emails / cc's / subjects / one body text and create an email in my drafts folder with the corresponding details. This uses the .to = , .cc = , etc. Our email server no longer recognizes the emails that get put into that field. Our IT...

Hi guys, can anyone help me please?! I have code that was working in Excel 2007, but I have upgraded my version of Office to 2010 and for some reason, the code keeps throwing back the error "Code Execution has been interrupted". It seems to always stop on the NumberFormats of the following...

I want to hide a column if a cell in the column has a 0 in a designated cell (binary coded via vlookup). I want to run this 9 times, for column E through column L. What am I doing wrong that is causing the error? Sub HideColumnE() If Cell("E5").Value = 0 Then...

Greetings, I'm working on a macro that does the following: 1. Pull data from the internet 2. Perform calculations on the data 3. Graph the calculated values - As I run the macro, Excel dies in step 3, where I graph the calculated values. - It works about 5% of the time and gives me the...

I wrote a code from various sources around the internet that pulls data from a website with a static url with the exception of 2 fields. I had this code working at one point but my computer crashed and i lost it and had to re write it. What the code does: I have a list of APN Numbers and i...

Sub MoveRows() Dim rownum As Integer Dim colnum As Integer Dim startrow As Integer Dim endrow As Integer Dim timerow As Integer rownum = 1 colnum = 1 Sheet2.Cells.Clear 'Worksheets("Sheet2").Select With ActiveWorkbook.Worksheets("Sheet1") Do...

I have three lines of code that do the following: (1) Opens another file based on a filepath in a cell in the current workbook. (2) Copies the values of a named range in the newly opened book. (3) Pastes values in tab "Detail" of the original workbook. When I put the three lines in the...

This code give me a "Type Mismatch" error, but I can't figure out the issue. Can anyone see what is mismatched? All this is meant to do is to break all links to other workbooks. Sub BreakLinks() On Error GoTo ErrorHandler Dim vLinks As Variant Dim lLink As Long vLinks =...