Renommer un tableau

Question

Je copie un tableau dans une autre feuille et dois le renommer mais voilà en passant par enregistrer une macro, le renommer ne marche pas. Si quelqu'un a la solution a mon problème. En vous remerciant Bien cordialement...

xorsankukai · Answer

Bonjour sandrien13 , Un exemple avec une inputbox pour définir le nom du tableau Cordialement...

Jean-Eric · Answer

Merci de joindre un fichier à ta demande. Cdlt...

Jean-Eric · Answer

Re,

Un exemple dans le fichier joint pour supprimer les lignes vides d'un tableau (listobject).

Le principe sera identique pour un terme (une information!?) à supprimer.

Cdlt.

13xlp-delete-blank-rows-in-table.xlsm (21.81 Ko)

Public Sub Clean_Table()
Dim rng As Range, rng2 As Range
Dim lCounter As Long
Dim n As Long, i As Long
    With ActiveSheet.ListObjects(1)
        n = .ListRows.Count
        For i = 1 To n
            Set rng = .ListRows(i).Range
            lCounter = Application.CountA(rng)
            If lCounter = 0 Then
                If rng2 Is Nothing Then
                    Set rng2 = rng
                Else
                    Set rng2 = Union(rng2, rng)
                End If
            End If
        Next i
        rng2.Delete shift:=xlUp
    End With
End Sub

Jean-Eric · Answer

Tu dois donner des précisions au sujet de la cellule (et donc de la ligne à supprimer). Quelle valeur, quelle colonne? Cdlt...

dhany · Answer

A la place de ta ligne surlignée en jaune, je te propose de mettre : If Not rng2 Is Nothing Then rng2.Delete Shift:=xlUp Si ça ne marche pas, je n'ai pas d'autre idée. dhany...

Jean-Eric · Answer

@ Sandrine, Peux tu être plus précise sur l'objectif final? Joins un tableau (avec des données!...) initial et le tableau final que tu souhaites... @ Dhany, Merci pour la correction. Cdlt...

dhany · Answer

Je te retourne ton fichier Excel : ⚠ Vérifie bien tout, car j'ai fait de très nombreuses modifs. Si tu veux autre chose, merci d'indiquer clairement ce dont tu as besoin. dhany...

dhany · Answer

Ce que tu demandes est trop difficile, en particulier pour ces différentes raisons : 1) Ta feuille nommée "FEUILLE DE TRAVAIL" n'a pas une structure normalisée !!! J'ai vu 9 parties pour les 9 centres R1 à R9, et le nombre de lignes de chaque partie n'est pas le même : R1 : lignes 4 à 19 : 16 lignes R2 : lignes 25 à 52 : 28 lignes R3 : lignes 58 à 74 : 17 lignes R4 : lignes 80 à 98 : 19 lignes R5 : lignes 104 à 110 : 7 lignes R6 : lignes 116 à 137 : 22 lignes R7 : lignes 143 à 160 : 18 lignes R8 : lignes 166 à 193 : 28 lignes R9 : lignes 199 à 218 : 20 lignes C'est trop divers !!! peux-tu faire une normalisation avec le même nombre de lignes pour chaque partie ? sinon : comment veux-tu qu'on trouve quelles sont les lignes à copier sur les 3 autres feuilles "SITU 1", "SITU 2", "BILAN" ? (tu as peut-être une idée ?) 2) Même si on trouve quelles sont ces lignes à copier, selon quoi choisit-on la feuille de destination ? je veux dire : sur "SITU 1" ? sur "SITU 2" ? ou sur "BILAN" ? en fonction de quoi ? 3) Si tu arrives à normaliser "FEUILLE DE TRAVAIL", ce sera déjà un gros progrès de réalisé !!! mais il faudra aussi que tu mettes plusieurs données (non confidentielles) , car je n'ai pas à inventer ce qui devra être copié !!! ;) il faut donc que tu mettes des lignes pour chacun des 9 centres R1 à R9. NB : j'ai bien compris qu'il ne faut pas copier les 5 dernières lignes de chaque centre, c'est-à-dire les lignes "SITU 1" à "TOTAL DU CENTRE" ; ni les lignes 224 à 229. dhany...