Résultats pour "compter visibles plage"

2'479 résultats pour cette recherche

Salut,

Tout d'abord, la fonction sous-total 109 ne fonctionne pas en colonnes.

J'ai donc pu trouver sur le forum une macro qui fonctionne parfaitement pour additionner seulement les données des colonnes visibles en créant une nouvelle formule intitulée SommeVisibles (macro que j'utilise) :

Function SommeVisibles(champ As Range)
  Application.Volatile
  t = 0
  For Each c In champ
    If Not c.EntireRow.Hidden And Not c.EntireColumn.Hidden Then
      t = t + c.Value
    End If
  Next c
  SommeVisibles = t
End Function

Celle-ci fonctionne avec une macro private_sub (pourquoi?):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Calculate
End Sub

J'aimerais avoir la même pour compter les cellules non vides dans une colonne, j'ai essayé ça mais j'ai une erreur #VALEUR

Function NbVisibles(champ As Range)
  Application.Volatile
  t = 0
  For Each c In champ
      t = t + c.CountA
  Next c
  NbVisibles = t
End Function

Une dernière question, plusieurs solutions existent sur le net, mais lorsque je fais un copier/coller sur VBA (sur module 1 ou sur la feuille concernée), comment je fais pour ensuite activer la macro?? (pourtant j'adapte la plage et je rajoute sub() et endsub () )

Exemple :

Range("A2:A1000").SpecialCells(xlCellTypeVisible).Count

Merci, j'espère avoir été assez clair

Bonjour,

je cherche une solution pour travailler uniquement les lignes visibles du tableau après un tri rapide via un segment.

1

Pour résumer, je souhaite voir apparaitre dans mon power query que les lignes visibles du tableau source.

Merci pour vos idées

Bonjour,

J'ai trouvé comment compter le nombre de lignes visibles => 6

Je découpe le résultat par 2 => 3

Si je veux sélectionner la seconde partie de la plage de cellules, je commence à la 5e ligne (4e + 1 pour l'en-tête)... sauf que voilà, 5 c'est pas le numéro de ligne de la 5e ligne visible !

Est-ce que vous avez une solution ? En VBA si possible car d'autres choses sont déjà faites.

Merci beaucoup.

PJ : l'objectif est donc de sélectionner les cellules A22 A23 A24

6classeur1.xlsx (8.00 Ko)

Bonjour,

Je souhaite faire un NB.SI reposant sur un tableau pouvant être filtré. Le problème de cette formule c'est qu'elle comptabilise toutes les données, mêmes celles cachées.

Petite exemple en PJ.

11nom.xlsx (9.80 Ko)

Bonjour,

Je viens de découvrir à mes dépends que lorsque l'on fait un copier coller d'une sélection "cellules visibles seulement" les formules ne sont pas collées mais seulement les valeurs. Alors qu'en faisant un simple copier coller les formules sont bien copier coller.

Exemple sur 3 colonnes : Colonne 3 = Colonne 1 + Colonne 2

En faisant un copier collé des lignes visibles seulements, les formules ont disparus mais le résultat reste bon la formule des colonnes 3 c'est transformée en valeurs.

Et là c'est le drame ! Lorsque j'ai changé les valeurs des colonne 1 et 2 je ne me suis pas rendu compte que les formules ne fonctionnaient pas

Peut-ont copier coller les "cellules visibles seulement" avec les formules ?

NB :

1 - Sélection des lignes/cellules incluant les lignes cachées

2 - F5

3 - Cellules

4 - "cellues visibles seulement"

5 - copier

6 - coller dans un autre onglet ou ailleurs dans la même feuille.

Merci pour votre aide

Cordialement

Bonsoir,

Dans mon document Excel, j'essaie de lancer une recherche d'un code, dans une base de données, en passant par des filtres pour accélérer la procédure.

Le problème, c'est que dans certains cas, j'ai des erreurs et je n'arrive pas bien à comprendre d'où cela provient.

Spoiler

J'ai une erreur "Dépassement de capacité" qui apparaît si j'utilise :

q = plage.SpecialCells(xlCellTypeVisible).Count

Et l'erreur "Pas de cellule correspondante " si j'utilise

Set plage = bdd.Range(.Cells(2, cib), .Cells(lrbdd, cib)).SpecialCells(xlCellTypeVisible)
q = plage.Count

Le mieux étant d'expliquer ce que je cherche à faire :

  • Dans la feuille "Périmètres N2000"
  • Enregistrer le numéro inscrit en [colonne B] (Exemple : FR9110108) [J'utilise ce code : Left(.Cells(i, 2), 9)]
  • > L'utiliser pour filtrer la [colonne C] de la feuille "BDD "SPECIES"".
  • En [colonne S] de la feuille "BDD "SPECIES"" ne s'afficheront que les "NOM" qu'il faut copier.
  • Insérer le nombre de ligne correspondant au nombre de données copiées en [colonne C] de la feuille "Périmètres N2000"
  • Coller ces "NOM" en [colonne C] de la feuille "Périmètres N2000"

- Recommencer pour le numéro suivant dans la feuille "Périmètres N2000".

Je joins un document via cjoin car il pèse 2Mo.

Je vous remercie de votre attention.

Bonne soirée ! A plus tard

Bonjour à tous,

je suis bloquée sur un problème depuis quelque temps j'ai environ 8 feuilles dans mon classeur, entre chacune de ces feuilles il y a des feuilles que j'ai volontairement masquées. je souhaite effectuer la somme des cellules J5 sur chacune de mes feuilles visibles uniquement. Mais je me rend compte que mon résultat prend également en compte les cellules J5 des feuilles masquées. la formule que j'utilise est la suivante:

SOMME(N(INDIRECT(AC6:AC13&"!J5")))

Mais elle me renvoie une erreur de type REF, dans ma plage AC6:AC13 j'ai renseigné les noms de mes feuilles visibles. j'ai vraiment besoin d'aide.

ci joint un exemplaire pour plus de compréhension

Merci

Cordialement

Hello,

Je voudrais envoyer par mail via outlook un Range après un filtre...

Jusque là pas de problème.

Le problème survient lorsque je fais un filtre sur une de mes colonnes ...

Mon programme ne me prend plus en compte la sélection mais la feuille entière ...

Auriez-vous une soluce ??? Merci.

Mon code + fichier exemple :

Sub Diffusion()
Dim Ligne_En_Tete_VIVIER As Byte
Dim Feuille_VIVIER As Worksheet
Dim Plage_De_Diffusion As Range
'Generer le mail sans cocher la référence OUTLOOK LIBRARY
Dim oAPP                       As Object
Dim oItem                      As Object
Const olMailItem               As Long = 0

'###########################################################################################
'~~~~~~~~~~~~~~~~ Variables à modifier si la structure change ~~~~~~~~~~~~~~~~~~~

'## Si la ligne de référence de l'en-tete du classeur VIVIER change, modifier cette variable ! ##
Ligne_En_Tete_VIVIER = 10
'## Si la feuille de référence de ce classeur change, modifier cette variable ! ##
Nom_Feuille_VIVIER = "TDB_VIVIER"

'On defitnit la feuille VIVIER
Set Feuille_VIVIER = ThisWorkbook.Sheets(Nom_Feuille_VIVIER)
Dim derlig As Integer
derlig = Feuille_VIVIER.Range("F65000").End(xlUp).Row '//choix de la dernière ligne
'For Each Ligne In Range("A10:L" & derlig).SpecialCells(xlCellTypeVisible).Rows
'Ligne.Select
'Next Ligne
Range("L" & derlig).Select '//choix de l'angle de sélection inférieur droit
Range(Selection, Selection.End(xlUp)).Select
Range(Selection, Selection.End(xlToLeft)).Select '//jusqu'à A1
Selection.SpecialCells(xlCellTypeVisible).Select '// sélectionne que les cellules visible

''On definit la Plage de diffusion
'Set Plage_De_Diffusion = Feuille_VIVIER.Cells(Ligne_En_Tete_VIVIER, 1).CurrentRegion.SpecialCells(xlVisible)
''Copie de la plage
'Plage_De_Diffusion.Select
'ActiveSheet.Range("A10:B15").Select ' la plage de cellules à envoyer
ActiveWorkbook.EnvelopeVisible = True

With ActiveSheet.MailEnvelope
    .Introduction = "Bonjour," & vbLf & "Vous trouverez ci-joint le VIVIER"
    .Item.To = ""
    .Item.Subject = "VIVIER RECRUTEMENT"
    .Item.Display
End With
End Sub
4conso-vivier.xlsm (68.63 Ko)

Bonjour

j'ai un fichier ( joint) qui représente un tableau de chiffre d'affaires par pays.

A partir de ce tableau, un graphique avec des étiquettes est créé.

Seulement, il se peut que pour certains pays, le CA soit nul. Je voudrais que les étiquettes du graphique n'apparaissent pas quand les infos sont à 0.

Pouvez vous m aider ?

merci

Bonjour à tous !

S'il vous plaît, comment puis-je rendre visibles sur le navigateur les images contenues dans un classeur html ?

Sachant que le format html sépare les contenus textuels de ceux objet.

Merci et meilleurs voeux 2019 !

Bonjour,

Sujet simple à traiter surement mais la je coince !!!

Je souhaite faire un filtre dans la colonne A avec l'information "B NOK TRANSFERT C" puis faire un copier des informations de la colonne C et les coller dans la Colonne B.

Le souci est que les valeurs de la colonne C écrase les valeurs des cellules de la colonne B sans prendre en compte le filtre de la colonne A.

Pour compliquer, le but est de faire des copier coller et pas de formule...

Je vous envoie le fichier xls et image pour plus de compréhension

test image
13test.xlsx (10.73 Ko)

Bonjour,

Je souhaiterais faire un copier/coller valeur des cellules visibles uniquements, au même emplacement.

Il y a actuellement dans le fichier joint une macro qui permet de :

Etape 1 : Cacher les colonnes et lignes que je ne souhaite pas copier

Etape 2 : Selectionner la plage contenant les cellules à sélectionner

Etape 3 : Sélectionner les cellules visibles de cette plage

Etape 4 : Et là je souhaiterais coller en valeur cette sélection et c'est la que je bloque

Extrait de la macro Etape 3

' Sélectionner plage B9:AD50, puis sélectionner les cellules visibles uniquement

    Range("B3:AD50").Select
    Selection.SpecialCells(xlCellTypeVisible).Select
    Selection.Copy

    ' Et là je souhaiterais coller en valeur les cellules visibles sélectionner au même endroit

J'ai joins le fichier en valeur volontairement pour ne pas que vous aillez des erreurs #VALEUR car dans le fichier de base il y a normalement des références externes.

Je vous remercie d'avance.

18classeur1.xlsm (25.76 Ko)

Bonjour à tous,

Voici la problématique:

Un fichier sous Excel 2010 est partagé entre 2 personnes.

La personne A a masqué des colonnes pour les cacher à la vue de la personne B.

Hors, lorsque la personne B ouvre le fichier, les colonnes masquées par A sont affichées.

Que faut-il faire pour qu'elles restent masquées ?

Merci d'avance pour votre contribution.

Henri

Bonjour à tous,

J’essai de développer un outil de gestion.

Je suis confronté un problème :

Cet outil étant destiné à plusieurs personnes, j’utilise la fonction environ(« username ») afin d’afficher uniquement les onglets qui correspondent à l’utilisateur.

Chaque utilisateur a donc plusieurs onglets qui lui sont destinés et l’admin a accès à l’ensemble du fichier.

J’ai créé un onglet "récapitulatif" qui comporte plusieurs statistiques en fonction du contenu des autres onglets.

(Par exemple la somme de la cellule A1 de chaque onglet). Et c’est là le problème. En essayant la formule Somme(feuil1:feuil30!:A1), elle prend en compte tous les onglets. Est-il possible de faire la somme des onglets visibles seulement ? Ce qui permettrait à l’utilisateur d’avoir les stats pour ses onglets uniquement.

Si il existe une solution avec une formule ça serait parfait, sinon je me pencherai sur du vba.

Merci d’avance pour vos solutions, et en espérant avoir été clair dans l’énoncé de mon problème.

Steven

Bonjour à tous,

Je dispose d'un classeur dans lequel je fais bcp de C/C, cependant j'ai des colonnes ou lignes masquées.

Je connais bien le raccourci F5 > Cellules > Cellules Visibles Uniquement. Cependant est-il possible de paramétrer Excel ou simplement le fichier pour que ce soit par défaut afin que je n'ai pas à le faire à chaque fois?

Merci à vous !

Pierre

Bonjour à Tous et à Toutes

J'ai un soucis concernant la suppression des lignes sur un fichier excel, en fait j'ai un code VBA qui copie et colle des données dans un onglet et filtre sur une colonne, j'aimerai un fragment de code qui selectionnerait uniquement les lignes filtrées visibles et les supprimeraient , dans ce cas présent c'est la colonne F filtrées sur les #NA

Merci à vous

Sheets("Exports Euclide").Select

Range("A2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("B5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("F2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("C5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("B2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("E5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("C2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("G5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("D2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("H5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("E2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("I5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("G2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("L5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("H2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("M5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("j2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("o5").Select

ActiveSheet.Paste

Sheets("Exports Euclide").Select

Range("k2:s2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Test Macro3").Select

Range("p5:x5").Select

ActiveSheet.Paste

Sheets("Test Macro3").Select

Rows("4").AutoFilter

ActiveSheet.Range("$A$4:$WWE$3964").AutoFilter Field:=6, Criteria1:="#N/A"

Bonjour

Je viens de passer sur xls 2017 s/ un MACBook Pro impossible de retrouver l'icône Sélection Cellules Visibles dans l'onglet "ACCUEIL"

Quelqu'un pourrait m'aider ?

Merci bcp

Nathalie

AVANT SUR WINDOWS :

selection cellules visibles xls windows

MAINTENANT SUR MAC :

selection cellules visibles sur xls mac

Bonjour à tous,

Est-il possible d'utiliser la fonction DECALER uniquement sur les cellules visibles ?

Un exemple en fichier joint pour illustrer ma demande !

Merci d'avance pour votre aide !

22essai-decaler.xlsx (11.76 Ko)

Bonjour,

Petite question technique.

J'ai un fichier Libreoffice calc (5.3) avec certaines cellules qui sont filtrées. Je voudrais copier-coller, dans une autre feuille, les cellules visibles. Or Calc me copie-colle également les cellules non visibles.

Il me semble que ça ne me faisait pas ça avant et que lorsque je copiais les cellules visibles, j'arrivais à coller uniquement ces cellules.

Comment faire ?

Merci,

Ruditapes

Bonjour,

Auriez-vous une astuce, une macro, un outil... pour coller des valeurs uniquement sur les cellules visibles dans Excel ? En effet lorsque vous avez un filtre, le collage s'effectue même sur les cellules masquées.

Actuellement je met des couleurs puis je trie avant de copier. J'aimerais quelque chose de + simple et efficace

Merci d'avance

Recherches récentes

decimalescaissehypertextedashboardvba caissedanielsavdonnees independantesite webqcmimpression feuille listbox dateimprimer listbox datesecurite incendieaudit securiteplanificateurgestion stock fifofifo stockcolorier selectionligne colonneemplois temps