Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
String Array
Hi,
I'm going around with this. What am I doing wrong? Option Explicit Private ProRataShareCell As String Private Sub Worksheet_Activate() Dim N As Long Dim ProRataArray As String ProRataArray = Array _("F30", "G30", "H30", "I30", "J30", "K30", "L30", "M30", "N30", "F36", "G36", "H36", "I36", "J36", "K36", "L36", "M36", "N36") For N = 1 To 18 If Application.Match(Me.Range("K43").Value, ProRataArray(N), 0) Then ProRataShareCell = ProRataArray(N) Debug.Print ProRataShareCell End If Next N End Sub -- Thanks for your help. Karen53 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Using a string as a formula (for an array) | Excel Programming | |||
String Array initialisation | Excel Programming | |||
String array issues. Need help... | Excel Programming | |||
Passing a String in Array to Range as String | Excel Programming | |||
Convert a string to an array | Excel Programming |