VBA Excel probleme debutantRésolu

Question

bonjour, je débute sous VBA EXCEL et je n'arrive pas à comprendre quelque chose qui à mon avi est très simple, je m'explique:
Je dois creer une fenêtre qui me demandera par exemple mon prenom (facile jusque là) puis mon programme devra le convertir en ASC II (decaler de 2 cases mais celà n'est pas important).

Mon problème est que le programme va me convertir mon prenom en plusieurs parties, seulement j'aimerais qu'il me mette le tout en une seule et même chaîne de caractère et je ne sais pas comment m'y prendre.

J'espère avoir été assez clair, voici mon travail:


 

Dim s As String
Dim sl As String
Dim lg As Integer
Dim c As String
Dim i As Integer
Dim j As String
Dim l As String



s = InputBox("tapez votre message:")
Debug.Print (s)

sl = LCase(s)

lg = Len(s)

For i = 1 To 15

c = Mid(sl, i)

Debug.Print (c)

code = Asc(c)
Debug.Print (code)


cc = Chr(code + 2)


MsgBox (cc)

Next i
End Sub



Merci d'avance, j'espère que quelqu'un pourra m'aider. bonnes fêtes à vous

pile_poil · Accepted Answer

si j'ai bien compris ton probleme
cc = cc & Chr(code+2) 

d'autre part il me semble que 
c = Mid(sl, i) 
devrait plutot s'écrire
c = Mid(sl,i,1) 

et 
For i = 1 To 15 
devrait lui être 
For i = 1 To lg

si c'est la solution,						 penser : REPONSE ACCEPTEE

Mookito · Answer

merci c'est super sympa de m'avoir répondu, ça faisait 2 jours que j'étais dessus et je ne trouvais pas.
 MERCi beaucoup

VBA Excel probleme debutant

2 réponses

Votre réponse

Discussions similaires