La méthode pastespecial de la classe Range échoue
Fermé
cameleon1881
Messages postés
20
Date d'inscription
lundi 6 janvier 2014
Statut
Membre
Dernière intervention
5 juillet 2022
-
5 juil. 2022 à 14:38
f894009 Messages postés 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 - 5 juil. 2022 à 18:48
f894009 Messages postés 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 - 5 juil. 2022 à 18:48
A voir également:
- Ouvrez cette page. dans le code de la page, modifiez la couleur de fond de la classe .pix. un code de 4 chiffres doit apparaître dans la grille. lequel ?
- Impossible de supprimer une page word - Guide
- Code ascii de a - Guide
- Code de déverrouillage oublié - Guide
- Code gta 4 ps4 - Guide
- Code puk bloqué - Guide
1 réponse
f894009
Messages postés
17241
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
19 février 2025
1 713
5 juil. 2022 à 18:48
5 juil. 2022 à 18:48
Bonjour,
Copy Paste ne marche qu'avec des cellules
Copy Paste ne marche qu'avec des cellules
Private Sub CommandButton1_Click() Dim i As Long, Verif As Boolean With Sheets("UTILITAIRE") Nb = Application.CountIf(.Columns(39), ComboBox1) 'nombre de fois valeur combox1 dans colonne AM If Nb = 0 Then i = Sheets("UTILITAIRE").Range("AM4").End(xlDown).Row + 1 Sheets("UTILITAIRE").Cells(i, 39) = ComboBox1 'ecriture valeur combobx1 dans premiere cellule vide End If End With End Sub