Matjazev.NET

Prvo prazno vrstico - celico v obsegu b15:b25 poišče makro Sub Prva_Prazna() For i = 15 To 25 If Cells(i, "b") = "" Then Cells(i, "b") = "Vaše sporocilo ali karkoli ": Exit For Next i End Sub Zadnjo prazno v istem področju pa Sub Zadnja_Prazna() For i = 25 To 15 step -1 If Cells(i, "b") = "" Then Ce...

Mogoče bi pa izbrali pogojne stavke "case"

Sub Izbira()

Select Case Range("b1")

Case Is = 100
ukazi
Case Is < 100
ukazi
Case 300 To 500
ukazi
Case 600, 602, 605
ukazi
End Select

End Sub
LP Alan

Če prav razumem problem, je rešitev več. Najbolje je, če napišete tisti želeni makro pod enim imenom - npr.sub Moj_makro v modulu. Tega preprosto sprožate v modulu, iz tabele pa pod makro z dogodkom Private Sub ComboBox1_LostFocus() enostavno napišete ukaz za izvršitev podprograma - makra, enostavno...

Vem, da so v dodatku funkcije dec2hex, ..., v Excelu sta tudi funkciji hex() in oct() ne najdem pa funkcije, ki bi decimalni zapis spremenila v dvojiski: ali te funkcije v osnovnem paketu Office _Excell ali VBA ni?
Hvala za odgovor?

Najlepsa hvala za res dober odgovor.
Alan

Administratorjevemu odgovoru pa dodam še to:
mrežne funkcije se potrdijo s CONTROL + SHIFT + ENTER,
predno jo pa začnemo pisati, moramo pa označiti tudi primerno število celic ( ne samo eno), saj samo tako izpiše več rezultatov hkrati.
LP Alan

V Excelu večkrat napišem lastno funkcijo npr. Function Area(a As Double, b As Double) Area = a * b End Function, rad pa bi za to funkcijo napisal še pomoč, ki bi bila dostopna podobno kot pomoč za standardne funkcije. Kako in kam - to je prvo vprasanje! Rad bi tudi ustvaril lastno kategorijo funkcij...