I'm new to batch file scripting, and I was wondering if the following would be possible:
I have many routers that I manage. I want to be able automatically telnet to each one and run the same set of commands. Each one has a different IP address and password, which I can store in a text file for...
I'm trying to find the difference in minutes between two times, and store the result in an integer.
For example:
StartTime = 9:43:22 AM
EndTime = 9:47:17 AM
If I do EndTime - StartTime, I want to store the result (4) as an integer.
When a user presses the "start" button on my form, I assign...
I have a textbox that is used to enter multiple 2-digit numbers, separated by commas. I want to assign each 2-digit number to a separate string variable (or array element).
For example:
If the textbox contains "22,25,29,31" I want to have variables like these:
Str1 = "22"
Str2 = "25"
Str3...
I'm trying to compare rows on 2 worksheets. If there are matches then I want to take the rows off of the 1st worksheet and move it to a 3rd one.
My 1st worksheet consists of "admin calls." Column A is the phone number, H is the date, and F is the start time.
My 2nd worksheet consists of...
I have a column that contains times in military format. I want to convert the times to numbers, with no formatting.
For example:
Right now the columns show the following:
0:01
0:23
2:14
13:32
19:54
Their actual values are:
12:01:00 AM
12:23:00 AM
2:14:00 AM
1:32:00 PM
7:54:00 PM
I want it...
I just got it. Instead of Paste:=xlPasteAll I used Paste:=xlValues.
PHV, thanks a lot for all the help. I would have been stuck on this for quite awhile without you.
When I tried to pastespecial, it altered the formula and put that value in instead.
Here's the code:
Range("J15").Copy
Cells(lRow, 7).Select
Selection.pastespecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
J15 contains the formula (J14-J5)...
That works great, thanks!
Here's what I have so far:
lRow = ActiveSheet.Columns(1).Find(What:="*", _
SearchDirection:=xlPrevious, _
SearchOrder:=xlByRows).Row + 1
Range("J4").Copy Destination:=Cells(lRow, 1)
Range("J7").Copy Destination:=Cells(lRow, 2)
Range("J5").Copy...
What am I missing here?
'This is the first cell I want to copy over to the first
'blank cell in column A
Range("J4").Select
Selection.Copy
lRow = ActiveSheet.Columns(1).Find(What:="*", _
SearchDirection:=xlPrevious, _
SearchOrder:=xlByRows).Row + 1...
I'm very new to VBA.
I was trying to use something like this:
Sub MIT()
Dim lRow As Long
' Find the FIRST EMPTY row by adding 1 to the last row
lRow = ActiveSheet.Cells.Find(What:="*", _
SearchDirection:=xlPrevious, _
SearchOrder:=xlByRows).Row + 1
'Paste the data...
I looked over the FAQs, and for the most part I understand them.
How can you specify column A when you are searching for the first empty row? My template goes from I4:J15. I start entering information on Row 2 for each call, so the template is down further. I want it to ignore what's in...
I know that's a little wordy so I'll make it much easier. I want to find out how to copy the contents of a cell in column J to the first blank cell in column A. I should be able to do the rest from there.
Thanks
I use Excel to log calls at my work. On each call I fill out a small template (2 columns, 11 rows). I have a button (macro) that copies the template to a clipboard so I can paste it into a call tracking system.
In the same workbook I also have an area where I record a few of the fields in...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.