Inserer une ligne vide et la compléter
Résolu
Vendeen85160
Messages postés
5
Statut
Membre
-
Vendeen85160 Messages postés 5 Statut Membre -
Vendeen85160 Messages postés 5 Statut Membre -
Bonjour,
Je cherche à développer une macro pouvant exécuter les actions suivantes :
1. Insérer une ligne
j'ai utilisé le codage suivant :
2. Compléter cette ligne,
en colonne T U W : recopier la cellule précédente
en colonne V W : insérer du text
en colonne X : recopier Y
en colonne Y : recopier X
sur cette partie je bloque
Merci de votre aide,
EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici :
https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code
Merci d'y penser dans tes prochains messages.
.
Je cherche à développer une macro pouvant exécuter les actions suivantes :
1. Insérer une ligne
j'ai utilisé le codage suivant :
Sub ins()
lastr = Range("A65000").End(xlUp).Row
For i = lastr To 2 Step -1
Cells(i, 1).Select
Selection.EntireRow.Insert Shift:=xlDown
Next
End Sub
2. Compléter cette ligne,
en colonne T U W : recopier la cellule précédente
en colonne V W : insérer du text
en colonne X : recopier Y
en colonne Y : recopier X
sur cette partie je bloque
Merci de votre aide,
EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici :
https://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code
Merci d'y penser dans tes prochains messages.
.
A voir également:
- Inserer une ligne vide et la compléter
- Insérer une vidéo dans powerpoint - Guide
- Comment supprimer une page vide sur word - Guide
- Partager photos en ligne - Guide
- Insérer signature word - Guide
- Insérer liste déroulante excel - Guide
4 réponses
Recopie de T1 en T2
Recopie de U1 en U2
Insertion du texet "530000" en V2
Insertion du texte "Caisse" en W2
J'avoue ne pas trop comprendre, il me semble que ces 4 résultats sont conformes à ta demande
Ce que je t'ai donné est à adapter à ton fichier, tu y trouves la copie de valeur, de formule, l'insertion de texte (à toi de les définir), et l'inversion des colonnes X et Y
une autre version
http://www.cjoint.com/c/EFxrh2uJs8g
Cdlmnt
Recopie de U1 en U2
Insertion du texet "530000" en V2
Insertion du texte "Caisse" en W2
J'avoue ne pas trop comprendre, il me semble que ces 4 résultats sont conformes à ta demande
Ce que je t'ai donné est à adapter à ton fichier, tu y trouves la copie de valeur, de formule, l'insertion de texte (à toi de les définir), et l'inversion des colonnes X et Y
une autre version
http://www.cjoint.com/c/EFxrh2uJs8g
Cdlmnt
"Erreur d'execution '1004':
La méthode 'Range' de l'objet '_Global' a échoué "
Sur quelle ligne se produit l'erreur ?
Est ce que cette erreur ne proviendrait pas d'une tentative d'accéder à la ligne 0 ? As tu laissé lideb = 3 ?
Cdlmnt
La méthode 'Range' de l'objet '_Global' a échoué "
Sur quelle ligne se produit l'erreur ?
Est ce que cette erreur ne proviendrait pas d'une tentative d'accéder à la ligne 0 ? As tu laissé lideb = 3 ?
Cdlmnt
Je vous apporte quelques précisions sur le résultat attendu,
J'ai recopié votre code dans mon fichier, mais le résultat ne me convient pas,
Le résultat attendu est le suivant :
par exemple suite à l'insertion de la ligne n°2,
Recopie de T1 en T2
Recopie de U1 en U2
Insertion du texet "530000" en V2
Insertion du texte "Caisse" en W2
Recopie Y1 en X2 - cela fonctionne
Recopie X1 en Y2 - cela fonctionne
Merci de votre aide qui m'est très précieuse,