Entrée valeur cellule sous tableau mis en forme

[Lisette]

Bonjour à tous et bonnes fêtes de fin d'année !

J'ai un souci avec le tableau en copie.
Quand je mets une valeur en A10, mon tableau mis en forme est normalement censé s'agrandir pour englober la nouvelle ligne tapée, or cela ne fonctionne plus.
Je peux toujours faire Tab dans la dernière cellule du tableau pour l'agrandir, mais le souci est que je colle des données sous le tableau pour l'alimenter et que je ne peux donc pas faire tab. Je peux aussi l'agrandir par la suite avec les flèches, mais ce fonctionnement n'est pas normal.
D'autant qu'à ma dernière utilisation du fichier, cela fonctionnait.
Pourriez-vous m'aider s'il vous plaît ?

bonne journée à tous

 

[sylvanu]

Bonjour Lisette,
Sauf si je n'ai pas compris votre problème. Lorsque j'écris en A10 le tableau s'agrandit bien automatiquement.
( Je suis sous XL2007)
Etes vous sortie d' XL puis re rentrée ( ou même rebooter pour voir ). Parce que là, tout semble marcher.

 

[Lisette]

Bonjour @sylvanu ! Merci pour votre réponse.
C'est bien cela, mais ce qui m'inquiète c'est que je suis sortie et j'ai même redémarré mon PC pour être sure...

 

[laurent950]

Bonjour,
Après vérification la macro n'a pas était enregistré et je l'ai perdu
Laurent

 

[Lisette]

Bonjour @laurent950 Effectivement, la macro n'est pas très élégante, mais elle fonctionnait ;(
Par contre, même avec vos modifications, j'ai toujours le même problème.
Voici ce que j'obtiens

 

[sylvanu]

Bonjour le fil,
Le problème n'est pas lié à la macro.
J'ai testé, elle n'est pas activée lorsqu'on rajoute une ligne, qui pourtant fonctionne bien.
Ce qui est sur c'est que le fichier livré fonctionne. Donc le problème vient d'autre part : XL, options, windows ...

 

[laurent950]

Bonjour Lisette, sylvanus.
La procédure VBA n'est pas liée mais elle est pas écrite comme il faut, si elle doit servir dans le futur je l'ai corrigé.

J'ai corrigé :
Votre code ci dessous avant correction.

Sub CREATION()
'
' CREATION Macro
'
    Application.ScreenUpdating = False
  Range("i4,i5,i6,i7,i8").Copy
    Set Derligne = Sheets("DOCUMENTS ACTIFS").Range("$A$70000").End(xlUp).Offset(1, 0)
    Derligne.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, Transpose:=True
  Sheets("CREATION").Select
MsgBox "Informations enregistées dans l'onglet Documents Actifs", vbOKOnly + vbInformation, "SUCCES"
     Application.ScreenUpdating = True
End Sub

Le code corrigé : ci-dessous.
Les affectations sont cohérentes avec cette nouvelles procédure.
exemple :
- Range("i4,i5,i6,i7,i8").Copy
La copie de la plage se fait sur qu'elle feuille ! CREATION ou DOCUMENTS ACTIFS (Comme il y a plus d'une feuille dans le classeur)
- A présent la copie se fera bien sur la feuille ! CREATION
- FCreat.Range("i4,i5,i6,i7,i8").Copy
- c'est l'idée de cette correction

Sub CREATION()
'
' CREATION Macro
'
Application.ScreenUpdating = False
'
' Feuille : DOCUMENTS ACTIFS
Dim FdocActif As Worksheet
    Set FdocActif = Worksheets("DOCUMENTS ACTIFS")
Dim Derligne As Range
' Feuille : CREATION
Dim FCreat As Worksheet
    Set FCreat = Worksheets("CREATION")
'
' Feuille : CREATION
    FCreat.Range("i4,i5,i6,i7,i8").Copy
'
' Feuille : DOCUMENTS ACTIFS
    Set Derligne = FdocActif.Range("$A$70000").End(xlUp).Offset(1, 0)
        Derligne.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, Transpose:=True
' Feuille : CREATION
    FCreat.Activate
'
MsgBox "Informations enregistées dans l'onglet Documents Actifs", vbOKOnly + vbInformation, "SUCCES"
'
Application.ScreenUpdating = True
'
End Sub

VBA Corrigé ! = Import valeur de la feuille "CRÉATION" par Copier puis Coller vers la feuille "DOCUMENTS ACTIFS"

pour mémoire : Cette solution est inintéressante.
je ne connaissais pas Utiliser des Segments pour Filtrer les Données : pour info (si besoin)
https://support.office.com/client/f...ue&postJsllMsg=true&maskLevel=20&market=fr-fr

Exemple ci-dessous :

Merci Lisette
Laurent

 

[Lisette]

Merci pour vos réponses.
J'ai fait un autre tableau dans un fichier vierge et le problème est effectivement le même.
Je cherche partout dans les options, mais je ne trouve rien du tout...

 

[sylvanu]

Avez vous essayer de réparer Office ?

 

[Lisette]

Malheureusement, c'est un PC de travail et ils ont tout bloqué, je ne peux intervenir sur rien du tout ;(

 

[sylvanu]

Dans ce cas, plus simple. Demandez à votre service informatique de vous réinstaller Office;
D'ailleurs ils ont surement une procédure pour le faire, et vous la donnerons ... pour éviter de le faire aux même.

Mais avez vous vérifier que Clic droit dans le coin bas gauche de l'écran, puis Applications et Fonctionnalités est inopérant ?
si accessible, vous recherchez Office/Option avancées/Réparer.

Généralement ils ne vérouillent pas tout.

 

[Lisette]

Là si, tout est bloqué... J'ai vérifié et ils demandent un identifiant administrateur, qui n'est bien sur par le mien...
En tous cas, merci beaucoup pour votre aide, je vais essayer le service dépannage, qui est... en Roumanie...

 

[sylvanu]

Bună ziua, am o mică problemă și aș dori să vă solicit abilitățile dvs. foarte înalte .....

Bonnes fêtes de fin d'année.

 

[Lisette]

Bonjour à tous !
Petit update car j'ai finalement trouvé la solution, qui résidait dans les options !

Fichier
Options
Vérification
Cliquer sur "Options de correction automatique"
Onglet "Mise en forme automatique au cours de la frappe"

Cocher : "Inclure de nouvelles lignes et colonnes dans le tableau"

J'avoue que je ne suis pas honteuse de ne pas être allée dénicher cette option là-dedans !
Par contre, aucune idée sur le pourquoi du comment je l'ai décoché...

En espérant que ça aidera d'autres personnes.

 

[sylvanu]

Bonjour Lisette,
C'est pour ça que ça marchait chez moi.
L'option est bien cochée ( mais je ne savais pas même qu'elle existait ! )