just removing duplicate reply - see above - no option to just delete, that I can see...
Sorry, no... Was aware of that, and only relevance to VBA / VBE there is that AHK being run in VBE window to expand the text. It's not related to my question
I am new to AHK, and discovered it's awesome capabilities, which I have not seen done by VBA.
AHK is part of RPA, but is likely frowned upon by employers, while VBA as part of MS Office is perfectly acceptable.
Looking for a way to find a loophole to make it work.
Question: is there a way to "convert" AHK script into VBA and run it solely from Excel VBA, not in any way involving AHK at that point.
Run-time error '438': Object doesn't support this property or method
Trying to save a .csv workbook into same directory with name appended by cell value and in different format.
Getting Compile error in code below: Object required on "abc =" in "Set abc = ActiveWorkbook.Range("D3").Value" line
Formulas are just VLOOKUPs down to about row 1003
In Worksheet module code above does nothing. In ThisWorkbook module it gives: Run-time error '9': Subscript out of range
I came across a video last night about the Indirect function, and thought that would be exactly the way to address this matter - and it is - Thank you!
In C1 I have VBA populate active row number upon each selection change.
In G2 I have formula below, while trying to have the row number in column H replaced with value of C1 (the H&C1 bit).
H5 = Sum for column H (I have totals on top). H6 where data $$ starts.
This is to have G2 show remaining sum from total based on active row number in H.
How ludicrous is that.
Sheet1 has data in columns A:L
Need VBA to set rows dynamically for A3:L, based on last row with data in column C
Some columns have formulas, need formulas ignored, only data
On Sheet1 of workbook containing the code:
H2 has a path to source folder
i2 has a path to destination folder
H5 has a result of a =NOW() formula, pasted as Values (e.g. 5.13.19 9:27 - as in May 13th, 2019 and 27 minutes past 9 in the morning)
Need code to look through files in H2 folder, and if Date Modified is on or after Date and Time in H5, then copy only those files to destination folder in i2
*I'll probably need to use the Microsoft Scripting Runtime Library - In the VBA editor add a reference (Tools, Add Reference) and look for Microsoft Scripting Runtime Library and tick its box.
Trying to use <> version, but how do I get it to ignore cells that are blank but not empty (i.e. cells with formulas)?
Yep, that's the ticket - it did look like extra spaces were causing the issue
In F1 I have an alphanumeric entry - ABC123.
In range O6:O1005 I have results of a VLOOKUP from another worksheet. Hopefully all those match entry in F1.
To verify that using variations of =COUNTIF(O6:O1005,"="&F1) formula, however even when at least one in range O6:O1005 is a match to F1 - this formula returns zero.
I tested three different colors present simultaneously, covering both - area with data in cells and outside of data area. All rgbYellow converted to xlNone - just as desired.
Thank you both!
Total range in test was about A1:X40, hopefully will work just as well in greater ranges...
In your first code: is i a row and j a column?
That code works, but is there a way to modify it to automatically detect what the used range is, rather than having to ball park it in the code?
Below code gives Msg box for every instance when condition is met in a range. Need it to give Msg box only once, even if multiple lines in range meet the condition
This appears to work, but it keeps giving the message box for EVERY instance when that test is true. I need for the message box to come up only once, even if test is true for more than one line in the range.
Do you know how to solve that?
That works! How do I make it so that Navigation Pane is OFF when Windows Explorer opens when those links are for Folders and not web?
Code below only opens the kind of hyperlinks that are manually put into cells by right clicking cell through Insert Hyperlink step. But I need code which will open the kind of hyperlinks which are result of a formula, e.g. =HYPERLINK(A1)Code
- Sub OpenMultipleHyperLinks()
- 'Update 20141124 - https://www.extendoffice.com/documents/excel/2328-excel-open-multiple-hyperlinks.html#a1
- Dim xHyperlink As Hyperlink
- Dim WorkRng As Range
- On Error Resume Next
- xTitleId = "Select a range to open"
- Set WorkRng = Application.Selection
- Set WorkRng = Application.InputBox("Select a range to open", xTitleId, WorkRng.Address, Type:=8)
- For Each xHyperlink In WorkRng.Hyperlinks
- End Sub