Iemand een idee hoe ik het best windsnelheden in Excel omzet van km/u naar Beaufort ? Met de werkbladfunctie ALS kan je nl. maar 7 maal nesten, wat te weinig is (schaal loopt van 0 t/m 12). Het zal best wel lukken maar zo goed ben ik dus ook weer niet thuis in Excel
Dit is het snelste te doen via een functie. In Excel ga je naar Extra->Macro->Macro's, type in 'Beaufort' en klik op 'Maken'. Er verschijnt een VBA-editor. Verwijder alle regels en kopieer en plak onderstaande functie:[code]Public Function Beaufort(vbMs As Double)
Select Case vbMs
Case Is < 0.3
Beaufort = 0
Case Is < 1.6
Beaufort = 1
Case Is < 3.4
Beaufort = 2
Case Is < 5.5
Beaufort = 3
Case Is < 8#
Beaufort = 4
Case Is < 10.8
Beaufort = 5
Case Is < 13.9
Beaufort = 6
Case Is < 17.2
Beaufort = 7
Case Is < 20.8
Beaufort = 8
Case Is < 24.5
Beaufort = 9
Case Is < 28.5
Beaufort = 10
Case Is < 32.7
Beaufort = 11
Case Else
Beaufort = 12
End Select
End Function[/code]Ga vervolgens naar Bestand->Sluiten en terugkeren in Excel. In een willekeurige cel kan je nu deze functie aanroepen via =Beaufort(m/s), waarbij de parameter de windsnelheid in m/s is. Van km/u naar m/s is delen door 3,6.
Veel succes!
Gr. Ben
)