Résultats de la recherche

Re : Message erreur 13 alors que la macro fonctionne Merci pour la piste. Je viens de faire ce code : Sub supfeuille() Dim Val1 As Integer Val1 = Sheets("Packing list").[t16].Value Application.DisplayAlerts = False For I = Sheets.Count To 1 Step -1 If Sheets(I).Name =...

Re : Message erreur 13 alors que la macro fonctionne Bonjour, Oui il reste au minimum 2 feuilles. Je viens de faire le test sous PC (car je suis en Mac) et le message d'erreur n'intervient pas.

Re : Message erreur 13 alors que la macro fonctionne Bonjour Jean-Marcel, Merci pour ton aide. Voici le fichier. Quand je rentre le nombre de caisse (cellule en jaune) mon tableau s'ajuste à la bonne longueur. Je prends l'exemple de 3 caisses. Mes feuilles 1 à 3 vont reprendre...

Bonjour à tous, Je viens de créer une macro pour supprimer toutes les feuilles non nécessaires en fonction de ma Val1: Sub supfeuille() Dim Val1 As Integer Val1 = Sheets("Packing list").[t16].Value Application.DisplayAlerts = False For I = Sheets.Count To 1 Step -1...

Re : Macro pour sélection d'une plage de cellule en fonction d'une donnée saisie A force de chercher et modifier le code voici ma solution Dim Valeur1 As String Valeur1 = Sheets("Packing list").[u16].Value Range(Valeur1).Select selection.ClearContents Sachant que dans...

Re : Macro pour sélection d'une plage de cellule en fonction d'une donnée saisie Bonjour, Pour le fichier test joint il s'agit de sélectionner la plage I21 : I33. Mais si je change le nombre de caisse totale à 8 par exemple la plage à sélectionner est I21 : I28. Merci pour ton aide.

Bonjour à tous, Je cherche à créer une macro qui sélectionne une plage de données. Le problème est que la longueur de la plage de données est variable en fonction d'une nouvelle donnée saisie à chaque fois. Voici le fichier pour mieux comprendre. En vous remerciant par avance. Bruno