Discussion :

[Florent6744]

Bonjour,

Je viens vers vous car j'ai un probleme de formule que je ne comprends pas.

Je cherche a écrire une formule dont la ligne est numéroté par une macro.

Voici la macro:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub InsererTexte()
    Dim ligneActive As Long
    ligneActive = ActiveCell.Row
    ActiveCell.Formula = "=STXT(B" & ligneActive & ";5;13)"
End Sub

Mais lorsque je lance la macro cela me dit qu'il y a un bug sur la dernière ligne. Ma science des macro n'étant pas bien grosse je ne trouve pas l'erreur.

Si vous pouvez m'aider

Merci a vous.

[Franc]

Salut, teste ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub InsererTexte()
    Dim ligneActive As Long
    ligneActive = ActiveCell.Row
    ActiveCell.FormulaLocal = "=STXT(B" & ligneActive & ";5;13)"
End Sub

[Nain porte koi]

Hello,

en VBA les fonction Excel doivent être écrites en nanglé avec une "," comme séparateur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub InsererTexte()
    Dim ligneActive As Long
    ligneActive = ActiveCell.Row
    ActiveCell.Formula = "=MID(B" & ligneActive & ",5,13)"
End Sub