Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Create Array From Values in range
trying to creat a variant with the values in Range(Cells
(1), Cells(1, 9) so that I can run throught another range and flage matches. Can't seem to get the variant to work. Thanks!!! Dim vAGYBOOKS As Variant Dim vGOVBOOKS As Variant Dim vGRRBOOKS As Variant Dim i As Integer Dim r As Integer cGOVBOOKS = Array(Range(Cells(1), Cells(1, 9))) For i = r To 1 Step -1 Debug.Print Cells(i, 4).Formula If Not IsError(Application.Match(Cells(i, 4).Formula, cGOVBOOKS, 0)) Then Cells(i, 3) = "GOVTS" End If Next i End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Create Array From Values in range
You declared vGOVBOOKS and use cGOVBOOKS. Assuming you declare
cGOVBOOKS, change cGOVBOOKS = Array(Range(Cells(1), Cells(1, 9))) to cGOVBOOKS = Range(Cells(1), Cells(1, 9)) I didn't consider the loop. Alan Beban Tony Di Stasi wrote: trying to creat a variant with the values in Range(Cells (1), Cells(1, 9) so that I can run throught another range and flage matches. Can't seem to get the variant to work. Thanks!!! Dim vAGYBOOKS As Variant Dim vGOVBOOKS As Variant Dim vGRRBOOKS As Variant Dim i As Integer Dim r As Integer cGOVBOOKS = Array(Range(Cells(1), Cells(1, 9))) For i = r To 1 Step -1 Debug.Print Cells(i, 4).Formula If Not IsError(Application.Match(Cells(i, 4).Formula, cGOVBOOKS, 0)) Then Cells(i, 3) = "GOVTS" End If Next i End Sub |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Create Array From Values in range
Thanks!!! Simple typo
-----Original Message----- You declared vGOVBOOKS and use cGOVBOOKS. Assuming you declare cGOVBOOKS, change cGOVBOOKS = Array(Range(Cells(1), Cells(1, 9))) to cGOVBOOKS = Range(Cells(1), Cells(1, 9)) I didn't consider the loop. Alan Beban Tony Di Stasi wrote: trying to creat a variant with the values in Range(Cells (1), Cells(1, 9) so that I can run throught another range and flage matches. Can't seem to get the variant to work. Thanks!!! Dim vAGYBOOKS As Variant Dim vGOVBOOKS As Variant Dim vGRRBOOKS As Variant Dim i As Integer Dim r As Integer cGOVBOOKS = Array(Range(Cells(1), Cells(9, 1))) For i = r To 1 Step -1 Debug.Print Cells(i, 4).Formula If Not IsError(Application.Match(Cells(i, 4).Formula, cGOVBOOKS, 0)) Then Cells(i, 3) = "GOVTS" End If Next i End Sub . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Worksheet Function to Create Array of Size n with values x Through | Excel Discussion (Misc queries) | |||
Array: Counting multiple values within array | Excel Worksheet Functions | |||
Create a Chart with Values from Array AND NOT from Ranges | Charts and Charting in Excel | |||
Create and Array formula using range names | Excel Programming | |||
Create and Array formula using range names | Excel Programming |