rw.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...

Hoping someone can see the error of my ways in the below. THis designed to do two things... 1. If the record already exists, I simply updates it (works fine) 2. If the record doesn't exist, write it the historical sheet. (Doesn't work. Gives the "Object variable or With block variable not...

I am trying to write a value of 0.00 to a cell, (Per Textbox2) but it keeps skipping over the value and not writing anything in the cell. I tried stopping the code and it shows up as .000 per the textbox2, but it jumps to the end of the statement. If I add a value of .001 it works, but 0...

I hope this makes sense. I am want to be able to copy a formula to a cell, but I need it to use the next row number. See below: The Column won't change, but the row number will change. How can I copy this simple formula to use the active row this is copied too? Thanks, SB

I have my project working great except for one detail that I missed, I am shaking my head in disbelief that I did so. And now I don't know how to proceed. So long story short I have an Userform that totals 4 textboxs and and puts the total in the Total textbox. Then lastly I have a textbox that...

Hi, I have two workbooks, WB1 & WB2 as an example. WB1 contains my UserForm and WB2 contains the master data where the entered information from the UserForm is placed. My issue is that multiple people need to submit data via the UserForm yet if the 'Submit' button is pressed by two or more...

Hi, I'm new to the VBA world but I am getting there slowly. I have created a UserForm with a number of text and combo boxes. I am currently stuck whilst trying to sort out the command button. :confused: What I want to happen is that when the 'Submit' button is pressed, it checks that all the...

Hi, I have this code: For rw = 2 To num Application.StatusBar = String(3, ChrW(9609)) & "Scrubbing at row " & rw & "/" & num & "." If InStr(Range("L" & rw).Value, "1") > 0 Then Range("A" & rw).Value = "#" Range("K" & rw).Value = "#" Range("M"...

Second question of the day. I have a delete button as part of a userform, it originally worked just fine, I've since added a column to the worksheet, adjusted all the VB code to account for it but the thing that I can't seem to get working again is the delete button. The delete button code...

Hi, I have a datasheet and a template. I need to create around 30 worksheets(in the same workbook) using the data . When I run the macro with 7 sets of data it is working fine (execution time: 3 minutes). But it is hanging if I enter more number of data. Please find the code I am using Option...

Hi, looking for some help with vba to split a text string. The code I have is as follows: Sub SplitText() Dim numRows As Long Dim arrText As Variant Dim rw As Long With Sheets("Sheet1") 'get the number of rows numRows = .Cells(.Rows.Count, "B").End(xlUp).Row...