Christian0258
XLDnaute Accro
| Bonjour à tout le forum, |
| Pourriez-vous me dire, pourquoi cette macro ne fonctionne pas ? |
| Ce que je souhaite : |
| j'ai un tableau AB:AW qui contient données issues de formules. |
| Je voudrais que la macro trouve la dernière ligne renseignée, quelle la copie, quelle l'éfface et quelle colle les valeurs sur cette même ligne… |
| Merci pour votre aide. |
| Bien amicalement, |
| Christian |
| la macro: |
| Sub CopierDernièreLigne() |
| Copie la dernière ligne du tableau AB:AW |
| ActiveCell.Offset(1, 0).Rows("28:49").EntireRow.Copy |
| effacement des données de la ligne copiée |
| Selection.ClearContents |
| Collage des VALEURS de la ligne copiée |
| Range("AB65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues |
| End Sub |