Need the proper syntax to use Case/Select Case in vba properly.

**rbion** · 05-16-2013, 01:49 PM

I want to create a column that identifies the type of laptop in each row. There are four possibilities (standard, lightweight, test standard and test lightweight). I'm a beginner at macros/vba but want to learn how to use the Select Case feature in my script. I'm missing something obvious as the macro thinks everything is the same :-( Please see attached file with macro.

**Norie** · 05-16-2013, 01:55 PM

Try this, but note this isn't the usual way to use Select Case.

    Select Case True
        Case Left(Cells(Row, Column), 4) = "Port" And Cells(Row, Column - 4) = ""
            DeviceType = "lightweight"
        Case Left(Cells(Row, Column), 4) = "Tecr" And Cells(Row, Column - 4) = ""
            DeviceType = "standard"
        Case Left(Cells(Row, Column), 4) = "Port" And Cells(Row, Column - 4) = "TEST"
            DeviceType = "TEST lightweight"
        Case Left(Cells(Row, Column), 4) = "Tecr" And Cells(Row, Column - 4) = "TEST"
            DeviceType = "TEST standard"
    End Select

**rbion** · 05-16-2013, 02:06 PM

That simple change did make it work perfectly thanks.

I'll continue reading on the proper use of Select Case since I've had little exposure to it so far. I thought it was used similar to an IF statement except Select Case allows for multiple situations/conditions.