i.value

Hi All, I’ve been struggling with how to return the name of checkboxes using a For Next statement so I can push data to cells if the box is checked. There are 20 buttons on the form. First I tried Dim DBoard As Worksheet Set DBoard = ThisWorkbook.Sheets("Woodside Dashboard") '...

I'm working on a file that needs to match up time stamps but from two different data sets. The only data that matches within those two data sets is a 10 digit number. Both sheets are sorted in ascending order so the time stamps will correspond when matched. There's nothing I can concantenate to...

I have a userform (as you might suspect from the title :) ) with several (100s) of textboxes and comboboxes that will be posted to a worksheet. I'm hoping I can loop through all the controls instead of typing out each one. I tried to use this: For i = 1 To 6 ActiveSheet.Range("B" & i +...

I thought I was doing this right, but apparently not. Getting a "File Not Found" error when the file is not present in the folder. I know that the file sometimes won't be in the first folder or both folders. I think my On Error line isn't correct. What am I missing here? Sub Copy()...

Below Mentioned Module Sends Replyall to all mails available in outlook. I need to send replyall only mail Subject matches the subject in the cell value can any one help me out... Sub ReplyMail() Dim olApp As Outlook.Application Dim olNs As Namespace Dim Fldr As MAPIFolder Dim olMail As...

I have a table that looks like this: <tbody> Teacher Class Mark Smith English Mark Smith Math David Park Science David Park History </tbody> I currently have a VBA solution (at the bottom) that combines teachers to one row, and lists their classes in the next, separated by commas...

Hello All Just trying to use an integer as my relative column reference in the below. It works fine with a single cell but I get a '400' error when using it against a range of more than one cell. For example, the below works just fine as it puts a value in cell E5 on the specified sheet...

Hi, I want to copy the values from a non-contiguous vertically arranged range of data (a mixture of strings and currency) from a source workbook into a contiguous horizontally arranged dataset in a different workbook. I've gotten the following code so far, but is there a way to do it faster...

I'm trying to delete entire row if cell in column I is NOT like "*loenn*" or not like "*lott*". Both wildcard search and multiple conditions if to delete row. Tried this: Last = Cells(Rows.Count, "A").End(xlUp).Row For i = Last To 2 Step -1 If ((Cells(i, "I").Value <>...

Hello all, I keep getting a Type: Mismatch error on the following code (orange line): Dim Tijdwaarde As Variant Tijdwaarde = Sheets("Par").Range("B30").Value LastRowATImpSht = Range("C" & "65536").End(xlUp).Row For i = 2 To LastRowATImpSht Step 1 Range("F" &...

Hello, I've been researching for a while but haven't been able to find an explanation. I know the issue is with the "not equal to" part but I don't know why. Why does the code updates the XYZ cell on column B when the cells on column C are "CHECKED" or "REVISED". The intention with the code is...

Hello, I am using the following code to export invoices as pdf files. But, I want to run the macro only for the new records in raw-data sheet. Is it possible to frame a logic to find the last used cell in raw-data which has hyperlinks To be simple I want to run the macro only for the new...

Hello. I am new to VBA coding and have never worked with creating a Macro prior to this. Any assistance would be greatly appreciated. I have a Excel sheet that is named Flight Log Tracker and I would like the sheet to automatically insert a row when the value in AU column is "Y". The...

So... I've got 3 columns in my excel spreadsheet, I,J and L. Looks something like this: I J L 1 1 1 3 3 3 4 7 4 5 6 7 The column L is supposedly empty but I wanna make those numbers appear there.L would be based on I and J. The...

I don't know why I'm getting a Type Mismatch error. I'm trying to do a simple subtraction macro with a variable row spreadsheet and getting a Type Mismatch error on this line of code: I'm subtracting two dates, column I which contains expiration date must cell "AA1" which contains today's date...

Hi, I already use this code for ComboBox controls successful using the following code. Dim i As Long For i = 6 To 1 Step -1 If Me.Controls("ComboBox" & i).Value = "No" Then ActiveChart.Legend.LegendEntries(i).Delete End If Next i I'm trying to do the same to ToggleButtons using...

I hope you can help. I have a small piece of code below. The issue I am having is that I am trying to subtract today's date from the date in Column T and then return a numerical result in Column U and then continue this formula down Column U until there is no values left in column T to subtract...

Hello Im trying to add 30 days into the put date but it could not work. anyone to advice me? below is the syntax Private Sub Worksheet_Change(ByVal Target As Range) Dim lastrow As Long lastrow = Cells(Rows.Count, "b").End(xlUp).Row For i = 20 To lastrow If Range("b" & i).Value <> "" Then...

I have some values like this: Cluster_0052.001.1 I want the numeric portion. I used a formula that worked for most of them =RIGHT(A2,LEN(A2)-8)*1. However, there are about a 1000 where this didn't work. I even tried in VBA and they wouldn't convert (i get a type mistmatch error): For i =...

Howdy, I have used this code before for other sheets in my workbook. I changed the name to be the new worksheet and adjusted the code throughout my workbook to include the new worksheet. I get the Compile Error: Variable Not Defined when ever I point to the Set wsIBMass (new worksheet). I am...