Search:
Type: Posts; User: jakefuller
Search:
Search took 0.03 seconds.
-
it seems to be working but i changed the last Range(aa).Offset(1).Select to Range(aa).Offset(0).Select
how do I add an if statement to the beginning? getting errors.
If ActiveSheet.Name <>...
-
I think this is working - does this check out??
Sub Macro4()
Dim ws1 As Worksheet
Set ws1 = Sheets("INTERNAL")
Dim ws2 As Worksheet
-
Good Afternoon -
Macro 1 copies a range and inserts it into the row I have highlighted and shifts down. Works great.
Macro 2 copies a range and inserts it into the row I have highlighted and...
-
It worked. I like it. Thank you!
-
Hello -
I'm looking for a macro to find and replace parts of a cell value.
I want it to evaluate cells in B:B. If it finds a cell containing "INTR", replace it with "INTL". if it finds "INTL",...
-
I took the easy route - I linked the checkbox to a cell and then adapted the code for that. Thanks for all the help!
If ws.Range("C1") = "True" Then
-
Thank you for the response. I'm getting the error "Compile Error: Method or data member not found" and it appears to be highlighting ".ReverseCheckbox" . See attached screenshot. Am I perhaps using...
-
the name of the sheet is MAIN, the checkbox is called ReverseCheckbox
-
Thanks for the feedback. I'm getting an error on the "If MAIN.ReverseCheckbox then" line. "Object required." I tried changing it to "MAIN.Reversecheckbox = True" and "MAIN.ReverseCheckbox = 1" but...
-
Hello -
I am trying to run a macro that evaluates if a box (ReverseCheckbox on the MAIN tab) is checked, and if so, run the rest of the code. What am I doing wrong? Thank you!
Sub REVERSE()...
-
Hello -
I am looking for a VBA to find a given value in a range (could be a named range) and when found, paste an X below it.
Sheet 1 - contains a button that would trigger the macro. Look for...
-
So i would like to make a user defined function, since my formula is super long and could easily be screwed up by my users. I think the problem is that i cannot figure out how to use a vlookup in a...
-
thanks once again vbfbryce!
-
The test would say "finance."
Thanks!
-
Hi. I want to insert a cell based on what is found in column K.
Here is my code, not sure how to tweak it.
Dim ws As Worksheet
Dim LastRow As Long
Dim j As Long
-
Well even with the old spreadsheet open it's not wanting to cooperate. I just want a way to shorten up my code, so when users are on my worksheet they can have an easier code, ie "getval()" instead...
-
yes it is. I was just able to get your suggestion to work, where the lookup table is in the same workbook/sheet. i guess my trouble is getting my
set mylookup =...
-
just put this in. getting the #VALUE!
Function getVal(x)
Dim mylookup As Range
Set mylookup = Workbooks("I:\PRICING.xlsx").Worksheets("spreadsheet").Range("A3:I620000")
-
ok that helps alot, thank you. But the function still does not want to take the "X" value (text) and perform a Vlookup. it just puts the entire code, including the equals, in the cell but does not...
-
When I created the function I wrote the code out while recording it as a macro. I used the mouse and clicked on my reference cells, and the macro put it in RC format.
-
It goes in as text, so the whole formula is displayed but doesn't calculate. The RC referencing could be an issue
-
Hi.
Not sure why my user defined function isnt working. It seems to be because of the "IF" statement.
Function material(x)
-
got it working, thank you.
-
I am very very new to userforms. I have one set up with 5 combo boxes and a text box.
Private Sub UserForm_INITIALIZE()
Me.TextBox5.ControlSource = ActiveCell.Address
ComboBox1.Value...
-
I'm trying to adapt a code to delete the entire row, if zeros are found in a specific column. the error occurs right after my if/then statement. Could someone tweak it for me?
Sub DELETEZEROS()...
-
WOW its now instant. Thank you so much for all the help westconn1 and vbfbryce !
-
The agility sheet should be active.
-
the following macros should be performed in order to reach the Sub copyinternalrange().
1-Sub export()
2-Sub addrowsabove()
3-Sub addrowsbelow()
4-Sub copyinternalrange()
the macro basically...
-
ok, so removing the +1 seemed to have fixed the issue, and added the above range in before each DR item. So my only complaint is that the macro takes a long time to run.
if you look under module...
-
ok, so this seems to work pretty well, thank you for making the code!
two things:
1) It takes about 5.5 minutes to run the code. i'm guessing you have no way of knowing why it takes me that...
-
i would like to paste a named range under certain rows of a new worksheet. If a cell begins with "DR", i want a range pasted below it. i also want a different named range pasted above. the code that...
-
Phenominal. thank you very very much.
-
I need a macro that will insert multiple (17) rows underneath a cell containing text beginning with "DR" all the way down a sheet.
this is my current code
Sub INSERTROWS()
a = 1
Do...
|
Click Here to Expand Forum to Full Width
|