Matjazev.NET

Seveda.

http://www.matjazev.net/forum/viewtopic ... =utripanje

Treba je pred funkcijo dodati Naprimer

Meni se zdi, da gospodu Bate-ju niso točno razjasnjeni vsi osnovni pojmi (funkcija, procedura, makro ...) Funkcija je nek "makro", ki vrne določen podatek. Funkciji podate parametre in ona vrne nek podatek. Funkcije lahko uporabljate tudi na listu npr. =SUM(A1:A5) Funkciji z imenom SUM ste podali pa...

Ni preizkušeno

Nič hudega, če se razvleče. Edino priporočljivo je že na začetku opisati problem in točno kaj bi radi ...

Se iskreno opravičujem ampak enostavno - pisal sem na pamet :oops: Public Sub ReverseString() Dim InputString As String Selection.WholeStory InputString = Selection.Text Dim lLen As Long, lCtr As Long Dim sChar As String Dim sAns As String lLen = Len(InputString) For lCtr = lLen To 1 Step -1 sChar =...

Ja. Ne deluje zato, ker je to funkcija in jo morate drugače pognati. Poskusite tako: Public Sub ReverseString() Dim InputString As String Selection.Wholestory InputString = Selection.Text Dim lLen As Long, lCtr As Long Dim sChar As String Dim sAns As String lLen = Len(InputString) For lCtr = lLen To...

Spet rešujem na pamet :roll: Skratka, fino je napisati tudi, kakšno napako vrne prevajalnik. For Each Cell In Range("e18:au19") If Cell.Value.Row("18") = 3 Then Cell.Interior.Bold = True End If Next Cell Upam, da je Cell že generirana, sicer: Dim Cell As Range For Each Cell In Range("e18:au19") If C...

Ena rešitev

http://support.microsoft.com/kb/287070

Za več google - microsoft outlook export / import

Ne da se mi pisat :) Public Function ReverseString(ByVal InputString As String) _ As String Dim lLen As Long, lCtr As Long Dim sChar As String Dim sAns As String lLen = Len(InputString) For lCtr = lLen To 1 Step -1 sChar = Mid(InputString, lCtr, 1) sAns = sAns & sChar Next ReverseString = sAns End F...

Uh ... Mislim, da bi moralo bi potemtakem moralo biti Range("K" & podatek.Row & ":" & "T" & podatek.Row).Select Uporablja namreč For Each zanko EDIT: No končno smo prišli do stvari, ki jo sploh želite. Problem je v tem, da med narekovaje ne morete postavljati spremenljivk ampak jih morate ločiti z z...

Saj nisem napisal Range(Stevec).Select ampak Range(Podatek).Select
Kaj ga moti? Moti ga to, da ne prepozna spremenljivk Kpodatek in Tpodatek, ki ste si ju izmislili.

OK. Včasih bolj namigujem (se sprehajam kot maček okoli vrele kaše) in poskušam, da bi sami nekako prišli do rešitve :) Če preverjate vrednost neke celice, bi mogli zapisati Dim Fiks Fiks=Range("J28").Value ' List1 Enako pri preverjanju If Podatek.Value = Fiks Then Še predtem morate deklarirati spre...

:cry: Joj joj joj ... Kje pa deklarirate spremenljivki Kpodatek in Tpodatek? To je tako, kot bi vam jaz rekel, povejte mi število, ki sem si ga zamislil. Niti približno se vam ne bi sanjalo, če vam ga jaz pred tem ne bi izdal. Torej, prevajalniku morate povedati, kaj predstavljata ti dve spremenljiv...

Verjamem, da se pritožuje. Še vedno nam namreč niste izdali, kako deklarirate tisti dve spremenljivki?