Archive | febbraio, 2009

Cos’�la LAR (Lettera Assunzione Responsabilit�) .: Knowledge Base Aruba.it

28 Feb

Cos’�la LAR (Lettera Assunzione Responsabilit�) .: Knowledge Base Aruba.it

10 Minute Mail: una casella di posta molto temporanea

24 Feb

10 Minute Mail: una casella di posta molto temporanea

Un biglietto da visita stile Google

23 Feb

Un biglietto da visita stile Google

Moro ha conquistato l’ultimo record dell’Himalaya – Corriere della Sera

23 Feb

Moro ha conquistato l’ultimo record dell’Himalaya – Corriere della Sera

Berlusconi: �La Tav Torino-Lione si far� – Il Sole 24 ORE

23 Feb

Berlusconi: �La Tav Torino-Lione si far� – Il Sole 24 ORE

DiskDigger recupera con la massima semplicit�i files inavvertitamente cancellati

23 Feb

DiskDigger recupera con la massima semplicit�i files inavvertitamente cancellati

Funzione Excel SeparaStringa

23 Feb

Function SeparaStringa(Ingresso As String, Separatore As String, Sx As Boolean) As String

‘ Creata il 23 Febbraio 2009
‘ Funzione da utilizzare per separare da una stringa due sottostringhe separate
‘ da un separatore convenzionale come uno spazio oppure una virgola o qualsiasi altro valore
‘ che è comunque indicabile nel secondo parametro di lancio della funzione.
‘ Il terzo parametro di lancio può essere VERO (identifica la sottostringa sinistra) o FALSO

Dim lunghezza

Ingresso = LTrim(Ingresso)
If Sx Then
SeparaStringa = Left(Ingresso, InStrRev(Ingresso, Separatore) – 1)
Else
SeparaStringa = Mid(Ingresso, InStrRev(Ingresso, Separatore) + 1)
End If

End Function