Hi all
I am trying to run the following code but get an Invalid qualifier error at the line marked with a *
I guess it has to do with arrays and ranges, but can't understand why.
(RowColCount is a function that returns the number of columns and rows that are not empty. )
thanks!!
Sub torre()
Dim Input_array() As Variant
Dim Isin_array() As Variant
Dim Input_range() As Range
Dim Isin_range() As Range
Dim NumRows As Long
Dim NumCols As Long
Dim shtDati As Worksheet
Dim shtTest As Worksheet
Set shtDati = Sheets("Dati")
Set shtTest = Sheets("Test")
NumRows = RowColCount(shtDati.Range("a1:a100"), "Row")
NumCols = RowColCount(shtDati.Range("a1:az1"), "Col")
Input_range = shtDati.Range("a1").Resize(NumRows, NumCols)
* Input_array = Input_range.Value
Isin_range = Input_range(NumRows, 4)
Isin_array = Isin_range.Value
Bookmarks