Probleme VBA Clearcontents

Fermé

antoine l - 2 déc. 2008 à 16:43
antoine l - 8 déc. 2008 à 14:24

Bonjour,

j'ai un souci sous VBA, je desire supprimer des cellules avec le code ci-dessous :

If requete = "Inflows1" Then

XL.Sheets(requete).Activate
XL.Sheets(requete).Range("h2").Value = DateArrete
XL.Sheets(requete).Range("c9:r9;c14:16;c18;c19;c21:c23;c25:c27;c29:c31;c33:c35;c37;c38;c40:c42;c44:c47;c49:c51;c53;c54;c56:c64;c67").ClearContents

End If

Si je remplace tout le groupe de cellule par une ou deux cellules cela fonctione et là l'erreur 1004 s'affiche...

Merci de votre aide

A voir également:

Sfr erreur c54
Erreur 1004 vba ✓ - Forum VB / VBA
Vba attendre 1 seconde ✓ - Forum VB / VBA
Vba dernière colonne non vide ✓ - Forum VB / VBA
Récupérer valeur cellule vba ✓ - Forum VB / VBA
Mkdir vba ✓ - Forum VB / VBA

2 réponses

Réponse 1 / 2

f894009 Messages postés 17190 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 16 mai 2024 1 705
7 déc. 2008 à 11:02

Bonjour,

XL.Sheets(requete).Range("c9:r9;c14:16;c18;c19;c21:c23;c25:c27;c29:c31;c33:c35;c37;c38;c40:c42;c44:c47;c49:c51;c53;c54;c56:c64;c67").ClearContents

Manque une lettre aprés c14:
XL.Sheets(requete).Range("c9:r9;c14:X16;c18;c19;c21:c23;c25:c27;c29:c31;c33:c35;c37;c38;c40:c42;c44:c47;c49:c51;c53;c54;c56:c64;c67").ClearContents

Avec quel EXCEL travaillez-vous? Car avec EXCEL2000 à 2002, le séparateur de liste est une virgule pas un point virgule.

Exemple fait avec l'apprentissage d'EXCEL
Sub Macro2()
'
' Macro2 Macro

'
Range("I2:N2,I6:N6,I8,J9,K10,L11,M12,N12,I15:N15,I17:I26").Select
Range("I17").Activate
Selection.ClearContents
End Sub

ClearContents: efface le contenu de cellule(s) pas la ou les cellule(s)

Bonne suite

Réponse 2 / 2

phadeb Messages postés 86 Date d'inscription dimanche 2 avril 2006 Statut Membre Dernière intervention 13 mai 2017 21
8 déc. 2008 à 10:02

Essaie de remplacer
.clearcontent
par
.value = null

antoine l
8 déc. 2008 à 14:24

Merci pour votre aide, j'avais un probleme de parametrage entre le ; et la , et les parametre européens...

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

VBA : Range avec références variables..

Méthode find dans VBA - Recherche de données sous Excel

Erreur d'exécution 13 Incompatibilité de type

ouverture d'un fichier excel à partir d'un code VBA

Discussions similaires

Newsletters