This basic code is working for now so I'll use this as the fix for my function. Thanks for the help!
Sub TestHorizontal()
Dim MyArray() As Variant
Dim MyRange As Range
Dim MyCell As Range
Dim I As Integer
I = 1
Set MyRange = Range("A1", Range("A1").End(xlToRight))
ReDim...
I was in a hurry. Great tips but I was actually concerned about being able to access the data in the horizontal array which is giving me errors.
I'm pretty sure the range exists because I can msgbox cell.value and get the correct value.
I guess I could use a range variable as an extra test to...
I'm hoping I don't do this a lot. I'm in a small business again and the only vba person right now.
I can get a vertical array to populate and loop very nicely. Then there's an array from a horizontal range that isn't doing the same thing very well. Specifically I can not read from it in...
Thank you! This is working
[code]
Sub CheckFileFormat()
Dim Array1(200) As String
Dim Array2(200) As String
Dim CurrFileName As String
Dim Numrows As Integer
Dim I As Integer
Dim rgFound As Range
CurrFileName = Range("A2").Value
If Range("F2").Value <> "" Then...
I don't know why I'm getting an error at the line that says Set RgFound
[code]
Sub CheckFileFormat()
Dim Array1(200) As String
Dim Array2(200) As String
Dim CurrFileName As String
Dim Numrows As Integer
Dim I As Integer
Dim rgFound As Range
CurrFileName = Range("A2").Value
MsgBox...
Went back to a do until loop but changed the offset that concatenates into the prom date a little. Now I'm missing some dates on the end but at least I'm getting the first date. For a forecast report that first date is crucial. The last date I can fix later. I think I need a loop that does a...
In the fourth column for each part number at the end of the list of items for that part number I want
date , qty , date , qty , date , qty
all as one string
I have the following table
Item Descr Date Qty/Rate
a aaa 7/24/2018 504
a aaa 9/18/2018 504
a aaa 11/2/2018 504
b bbb 7/31/2018 756
b bbb 8/15/2018 168
b bbb 9/21/2018 756
b bbb 10/19/2018 756
b bbb 11/16/2018 756
b bbb 12/14/2018 756
b bbb 2/8/2019 756
c ccc 9/4/2018 100
d d 10/5/2018 200
e e...
This might be more of an SAP question than a VBA question but I'm not having a lot of luck finding a good SAP forum that's easy to use and working well. I'm trying to use the following code to write to an SAP screen and eventually print the data that it finds. The code is working well down to...
I have one other question about VBA code mostly for a word document. I'm outputting a recordset from Access to Word and that's OK. Then I select a range between 2 bookmarks as I need to see that section of paragraphs to to the 2nd outline level which also works OK. However by default the 2nd...
Don't know if this is a duplicate post or not as I didn't see my last attempt post.
I have the following code in an access database
Set RST = DB.OpenRecordset(MySQL, dbOpenDynaset)
If Not (RST.BOF) And Not (RST.EOF) Then
RST.MoveLast
MyCount =...
I did have a do but I forgot to type it but I never think about search and replace for formatting. I always think about searching and replace for text so thanks a ton! That was perfect!
I'm not sure I'm thinking straight about this one. I'm trying to open a simple query, pull an item, look for it on a Word file and then bold it if it's found. If not move to the next item. I'm not sure I've done the best thing here as I can bold the first instance but no subsequent instances...
Kind of thought that wasn't really possible with a combo box. There's the Not In List event but I've never wanted to change a combo box line by line. Would it be easier to let them go back to the source, change it there and then requery the combo box?
Sorry. Probably going a little too...
I have a table that is laid out like so (and I have no control over how it’s just given to me that way).
Header 1 rule1
Header1 rule 2
Header1 rule 3
Header2 rulea
Header 2 ruleb
Header 2 rulec
Header3 ruled
I’m trying to send...
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.