jaskojsako ti je već dao odgovor. Umesto višestrukih if možeš da koristiš select case ... - nije bitna razlika
Što se tiče pretvaranja u velika slova
a/ Možeš da instaliraš neki font koji ima samo velika slova (ALL CAPS) i onda sa tim fontom da formatiraš kolonu
b/ Da koristiš makro koji će na promenu sadržaja ćelije da pretvori sadržaj u velika slova. Npr za kolonu A (od drugog do 2000 reda)
Code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("A2:A2000")) Is Nothing Then
If Target.Cells.Count = 1 Then
Application.EnableEvents = False
Target.Value = UCase(Target.Value)
Application.EnableEvents = True
End If
End If
End Sub
U primeru sam ti i skrivanje kolona dodao na promenu ćelije F1
Nije to loše Rembrante, samo što ne bi dodao još malo boje?