.cellsrows.count

I have this code i'm using to extract multiple tabs into one. Is there a better way to run this? Any help would be appreciated. Sub PullData() Dim i As Double Dim wscount As Double Dim imaxrow As String Dim Datastart As String Dim lowrow As String Dim uprow As String Dim x As Double Dim Ship As...

Hi, I have the following code that copies filtered data from one sheet to another. I use the copied data to populate a listbox on a userform: With ws .AutoFilterMode = False Set rng = ws.Range("B8:R8" & .Cells(Rows.Count, "B").End(xlUp).row) rng.Copy...

Hi everyone! Am new here and would appreciate some help. I have 2 sheets (Sheet 1 & Sheet 2) and would like to populate a portion of Sheet 2 with just 6 columns from a whole bunch of data I am updating manually everyday in Sheet 1 with a click of a button. However, there are some information...

When debugging, UserForm ComboBox1 and 2 will “auto select” the names in the ranges. I can enter the first letter in the ComboBox and the item is displayed, in this case, Range R is a list of cities, Range S is a list of States. When the UserForm is run LIVE, I must enter the entire city or...

Sub STEP2() Dim Lastrow As Long Dim Lastrow2 As Long Dim Lastrow3 As Long Dim Lastrow4 As Long Dim Lastrow5 As Long Dim Lastrow6 As Long Application.ScreenUpdating = False With Sheets("amir") Lastrow = .Cells(Rows.Count, 2).Row Lastrow2 = .Cells(Rows.Count, 7).Row Lastrow3...

Hello Everyone, Its been a while since my last visit. I have been working on the my VBA skills. I have a workbook with two sheets. I have written a code to append the data from one sheet to the other. But it is not working as desired. Any help or suggestion related to the issue is much...

I hope someone can help with this. I can't find anything on the web to help and everything I have tried fails. I need to multiply the figures in column L by 50 if the date in column A was before 01/04/2018 otherwise multiply it by 60. Here is the existing code which I was using prior to...

I have a workbook where I need to copy data in a workbook (SAT_Marzo.xlsm) from B3 to the last cell containing data and paste this into a different workbook (CONTABILIDAD TOTAL 2018.xlsm) in the first non empty cell of column C. This is the code I have presently where I am able to select the...