Lookup, but "embedded"

**zonino** · 10-27-2007, 07:39 PM

option one isn't an option, it has to be completely contained within the one file,

I'll have a go at option two, ta

**zonino** · 10-28-2007, 08:20 PM

Hi guys, I've been having a think about this, how would I write this as a function, so that I can put =gltext(A1)?

at some point I'll get round to learning VBA!

**Paul** · 10-28-2007, 09:16 PM

Hi again, Zonino.

To use as a function, place this code into a standard module:

Function FINDGL(rng As Range)
    Select Case rng.Text
        Case "1234-5678", "4567-8901"
            FINDGL = "Engineering"
        Case "2345-6789"
            FINDGL = "Production"
        Case "3456-7890"
            FINDGL = "Sales"
        Case Else
            FINDGL = ""
    End Select
End Function

Lookup, but "embedded"

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

Thread Information

Users Browsing this Thread

Bookmarks

Bookmarks

Posting Permissions