> Tous les forums > Forum Bureautique
 excel 2013, déplacement de cellulesSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
prosper34
  Posté le 12/03/2017 @ 18:21 
Aller en bas de la page 
Astucien

bonjour,

j'ai des tableaux sous cette forme :

et je veux obtenir ceci automatiquement :

c'est à dire : si cA et cB vides déplacer la ligne à la suite de la précédente (plusieurs milliers de lignes)

une formule ou macro, quelque chose de facile à mettre en œuvre car je suis nul.

merci d'avance

Publicité
ferrand
 Posté le 13/03/2017 à 03:56 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour,

Si tu peux fournir un classeur modèle comme support, ce sera bien...

Cordialement.

ferrand
 Posté le 13/03/2017 à 07:32 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Salut Debrief !

C'est bien pour ça qu'une illustration permet de faire le tour des variantes, voir les mises en forme à rétablir, etc.

Et ça permet d'écrire du code en situation...

Bonne journée.

prosper34
 Posté le 13/03/2017 à 08:51 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Debrief a écrit :

Slt,

C'est sûr que "si cA et cB vides" s'apparente à est une nouvelle technique de référence aux cellules

Je pense que prosper34 veut dire que si Ax et Bx sont vides, il faut déplacer Cx et Dx en Gx-1 et Hx-1 (sur la base des données affichées)

c'est exactement ça

Questions:

- Combien de lignes consécutives possibles où Ax et Bx sont vides ? 1 seule maximum ? Si plusieurs, où placer Cx et Dx ?
- Que faire si seulement Ax ou Bx est vide ? Ignorer la valeur non vide ? Ça n'arrive jamais ?
- Que faire si A1 et B1 sont vides ? Ça n'arrive jamais ?

Cordialement,
D.

bonjour et merci de ta réponse,

très bien tes questions à choix multiple

Anonyme a écrit :

il faut déplacer Cx et Dx en Gx-1 et Hx-1

Non pas -1 car il y a une suppression de ligne pour chaque report.

merci de ta réponse

la suppression de ligne pourra se faire en tri.



Modifié par prosper34 le 13/03/2017 08:54
prosper34
 Posté le 13/03/2017 à 11:56 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

re,

Sinon, une petite macro qui fait tout, facile à programmer possible si tu veux.

Oh ! oui, avec plaisir, merci

prosper34
 Posté le 13/03/2017 à 14:06 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

merci Debrief,

merci à toi, je me penche sur le truc et te tiens au courant (mon neurone est fatigué et je n'aime pas faire quelque chose que je n'ai pas compris).

ferrand
 Posté le 13/03/2017 à 22:13 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonsoir,

Ma préférence irait à un travail entièrement sur tableau, sans copie. On compose le tableau souhaité en VBA et on l'affecte à la fin, cela devrait être légèrement plus rapide.

Cordialement.

prosper34
 Posté le 14/03/2017 à 00:15 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

merci à vous mais ça fonctionne très bien comme ça :

En G1 -> =SI(ET(A2="";B2="";C2<>"");C2;"")
En H1 -> =SI(ET(A2="";B2="";D2<>"");D2;"")

le reste dépasse mon domaine de compétence

@+jp

ferrand
 Posté le 14/03/2017 à 00:32 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

A quelques milliers de lignes on ne devrait pas saturer... au-delà ? C'est effectivement l'interaction en écriture avec la feuille qui bouffe du temps.

Si tu l'évites, à la fin tu peux effacer en bloc (Clear pour supprimer les mises en forme). Tu réaffectes et tu remets en forme...

Mais bel effort (sans fichier) !

Remarque pour les suppressions de lignes, tu pouvais te contenter de l'effacement d'une cellule (sur la colonne en jaune par exemple) pour faire une suppression globale à la fin avec : colonne.SpecialCells(xlCellTypeBlanks).EntireRow.Delete

Ya un gain, mais moins qu'avec les Array... Expérience faite par Galopin (sur une construction de tableau que j'avais trouvé laborieuse, élément par élément, je pensais être plus rapide avec SpecialCells, et au chronométrage quelques millisecondes dans la vue au profit du tableau...)

A+

ferrand
 Posté le 14/03/2017 à 13:24 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

plage(dimensionnée).Value = tablo

Bonne journée

ne me viennent pas encore naturellement

Ne me venaient pas naturellement il y a 20 ans...



Modifié par ferrand le 14/03/2017 13:26
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
139,50 €Montre connectée Samsung Galaxy Watch 4 40 mm à 139,50 € livrée
Valable jusqu'au 27 Mai

Amazon Allemagne fait une belle promotion la montre connectée Samsung Galaxy Watch 4 40 mm qui passe à 134,74 € (avec la TVA ajustée). Comptez 4,76 € pour la livraison en France soit un total de 139,50 € livrée. On la trouve ailleurs autour de 209,99 €.

La montre connectée Samsung Galaxy Watch 4, propulsée par Android Wear 3.0, vous offre un accès idéal à l'univers Google tout en proposant un écran Super Amoled 1.2", une belle capacité de stockage et un suivi précis de vos activités sportives, votre santé et votre sommeil.

Montre en français dès le premier démarrage. Garantie européenne 3 ans. Vous pouvez utiliser votre compte Amazon FR sur Amazon DE. Pas de douane.


> Voir l'offre
59,99 €Ecouteurs intra-auriculaires sans fil Bluetooth Jabra Elite 3 à 59,99 €
Valable jusqu'au 26 Mai

Boulanger fait une belle promotion sur les écouteurs intra-auriculaires sans fil Bluetooth Jabra Elite 3 qui passent à 59,99 €. On les trouve ailleurs à partir de 79,99 €.

Profitez d'une expérience d'écoute unique grâce aux Jabra Elite 3. Des écouteurs intra-auriculaires True Wireless qui ont été conçus tout spécialement pour donner un nouveau souffle à votre musique. Ils sont aussi capables de vous offrir une qualité d’appel et un son exceptionnel, quel que soit l’endroit où vous allez.


> Voir l'offre
38,90 €Enceintes 2.1 Logitech Z313 à 38,90 €
Valable jusqu'au 26 Mai

Amazon fait une promotion sur le pack d'enceintes Logitech 2.1 Z313 à 38,90 €. On trouve habituellement ce pack d'enceinte + caisson de basses de bonne qualité à plus de 45 €. 

Un boitier de commande filaire vous permet de mettre les haut-parleurs sous tension, de régler le volume et d'accéder facilement à la prise casque.


> Voir l'offre

Sujets relatifs
Office Etudiant 2013 Excel, problème avec mes cellules
[Excel 2013] Fusion personnalisée de cellules
EXCEL déplacement des cellules...OFFICE 2002 PRO.
cellules sélectionnées à tort excel 2007
Excel - selection cellules non adjacentes
Excel (2013) un bien étrange phénomène
Faire le bon choix excel 2013
excel 2013
ALT + Entrée résulte en ligne supplémentaire dans Excel 2013
Enregistrer les modifications Excel 2013
Plus de sujets relatifs à excel 2013, déplacement de cellules
 > Tous les forums > Forum Bureautique