excel vba: if range is empty use adjacent

[ajm]

Hi all, trying to finish a job involving exported data. the export populates either range A10 or A11 on each sheet with a value. what do I use to to the effect that if A10 is blank, assign the value of A11 to my variable and vice versa?

 

[Trebor76]

Hi ajm,

This will assign the value from either A10 or A11 depending on which has data to a string variable called strMyVariable (change to suit):

Option Explicit
Sub Macro1()

    Dim strMyVariable As String

    If Len(Range("A10").Value) = 0 Then
        strMyVariable = Range("A11").Value
    Else
        strMyVariable = Range("A10").Value
    End If

End Sub

Regards,

Robert

 

[ajm]

Thanks Robert.

 

[Trebor76]

You're welcome