Contenu récent par rafou29

Bonjour, J'ai mis en place un calcul un peu délicat qui fonctionne si ce n'est qu'il ne me donne pas les bonnes valeurs. 'Commandbutton permettant le calcul Private Sub CommandButton53_Click() Sheets("Sheet1").Select For i = 2 To 65536 Dim y, z, x y = Range("D" & i).Value z =...

Re : somme cellules visibles uniquement dans TCD Finalement j'ai mis en place ta solution et ça correspond bien à ce que je cherchais. Encore merci pour ton aide !

Re : somme cellules visibles uniquement dans TCD Merci mais je me demandais si il n'y avait pas un moyen plus direct (en manipulant les TCD) car j'ai peur que cela me prenne pas mal de place ...

Bonjour, J'utilise un TCD qui me permet de traiter mes données situées dans les colonnes A à F de mon onglet Excel. Mon problème est qu'il m'arrive de filtrer les données de mes colonnes or mon TCD prend quand même en compte les données cachées alors que ça m'arrangerait qu'il ne somme que...

Re : Comment modifier une valeur par défaut d'un TCD ? Personne n'a la moindre idée sur comment résoudre ce problème ?

Re : Aide sur les filtres Salut, J'ai eu le même problème que toi il y a un moment et voici le code qui m'a permis de le résoudre : Private Sub ComboBox30_Change() Sheets("Sheet1").Select If ComboBox30.Value = "X" Then Selection.AutoFilter Field:=2, Criteria1:=TextBox40.Value...

Bonjour à tous, Je créé actuellement des TCD avec VBA et j'affiche les résultats sous forme d'histogramme empilé. Mon problème est qu'il peut m'arriver de n'avoir aucune valeur en abscisse et dans ce cas là, Excel me met la valeur "Total" or je souhaiterais pouvoir modifier cette donnée en...

Re : Data validation list Salut, Il faudrait ptet que tu précises à quoi correspond la variable "chaine" ;)

Re : Comment transferer des donnees par un boutton Salut, Je ne sais pas si sa correspond exactement à ce que tu souhaites mais moi j'utilise un code qui copie mes données pour les coller dans une autre feuille. Mon code: Sheets("Sheet1").Select Range("B:C").Select Selection.Copy...

Re : format date Salut, Perso moi j'utilise ceci comme code de mise en forme pour mes dates With ActiveChart.Axes(xlCategory).TickLabels .NumberFormat = "m/d/yyyy" End With J'espère que sa t'aidera ;)

Re : Explications code plage de données Merci sa va me permettre de rendre mon code plus lisible !

Re : Explications code plage de données J'ai trouvé le code que je cherchais et comme je m'en doutais, c'était tout bête Range("A:A,B:B,C:C,D:D").Select

Re : Explications code plage de données Je souhaiterais par exemple sélectionner des valeurs de plusieurs colonnes Voici mon code: Range("A1:D13").Select Dans mon cas, je ne connais pas ma dernière ligne de donnée donc je souhaiterais pouvoir le faire automatiquement. Dans mon...

Re : Explications code plage de données Je te remercie pour tes explications sa me sera utile. Maintenant c'est pour adapter que je sens que sa ne va pas être une partie de tarte. Comment fait-on lorsque la plage de cellule est variable,c'est à dire lorsque je ne connais pas le nombre de ligne...

Bonjour, J'ai trouvé un code qui pourrait bien me dépanner seulement je n'arrive pas à tout comprendre et ainsi l'adapter à mon cas. Voici le code: Dim MaPlage As Range Set MaPlage = Range("A1:B16") MaPlage.AutoFilter Field:=1, Criteria1:="Lille" Set MaPlage =...