Selection de nombres dans tables à dimensions variables Fermé

Question

Bonjour, 

Mon titre n'est forcément très clair.

Dans une feuille, j'ai une zone où je viens imnsérer des tables de différentes tailles en colonnes et en lignes. Les seules choses communes aux tables ce sont:
- la première case de position de la table (en A44)
- la présence de la colonne "Ecart" (la position en colonne est variable en fonction de la grosseur de la table) .
Mon besoin c'est pourvoir récupérer les valeurs des cellules NON VIDES de cette colonne "Ecart", pour les copier sur une autre feuille.

Merci d'avance

ccm81 · Answer

Bonjour

Une fonction qui renvoie le n° de la colonne "Ecart" dans la ligne li

Public Function ColonneEcart(li As Long) As Long
Dim obj As Object
Set obj = ActiveSheet.Rows(li).Find("Ecart", , , xlWhole)
If obj Is Nothing Then
  ColonneEcart = "ERR"
Else
  ColonneEcart = obj.Column
End If
End Function
Après à toi de dénombrer les cellules non vides de cette colonne

Cdlmnt

ccm81 · Answer

1. Je ne sais pas récupérer le contenu de "colonneEcart", pour le coller dans à un endroit choisi dans mon document. 
Tu peux utiliser cette fonction 
- à l'intérieur d"une procédure

  public sub machin()  dim co  ...  li = "la ligne à examiner"  co = ColonneEcart(li)  ...  End.
- carrément dans la feuille comme une fonction excel classique
  M20=ColonneEcart(20)

2. D'autre part tu me demande de "dénombrer" les cellules non vides de la colonne, mais vu que les tables sont variables, je ne sais pas comment faire. 
Je crois avoir mal interprété ta question. 
Mais on peut effectivement dénombrer les cellules non vides d'une plage, variable au non
Il faudrait plus de détail sur ce que tu veux faire

Selection de nombres dans tables à dimensions variables

2 réponses

Discussions similaires