Problème pour un copier/coller de valeurs VBA

Résolu/Fermé

astridlet - 27 déc. 2010 à 10:55
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 29 déc. 2010 à 20:23

Bonjour,

Je n'arrive pas à faire une sélection de valeurs (comme dans un collage spécial valeur)... Du coup lors de mon collage je n'ai que des #REF! ...
Quelqu'un sait-il ce qu'il faut que je modifie? :/

Voici mon code:


Sub ou()
      Dim tablo() As String, i As Integer
      tablo = Split("60601,66501", ",")
      For i = LBound(tablo) To UBound(tablo)
             Sheets(tablo(i)).Range("O101:AF" & Sheets(tablo(i)).Range("AF65536").End(xlUp).Row).Copy Destination:=Sheets("ETP").Range("B65536").End(xlUp).Offset(1, 0)
      Next i
End Sub

A voir également:

Problème pour un copier/coller de valeurs VBA
Copier coller pdf - Guide
Copier une vidéo youtube - Guide
Super copier - Télécharger - Gestion de fichiers
Copier coller formule excel sans décalage ✓ - Forum Bureautique
Copier coller multiple - Guide

3 réponses

Réponse 1 / 3

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
27 déc. 2010 à 23:32

Bonjour,

Essayer ce code :

Sub ou()
Dim tablo() As String, i As Integer
tablo = Split("60601,66501", ",")
For i = LBound(tablo) To UBound(tablo)
  Sheets(tablo(i)).Range("O101:AF" & _
  Sheets(tablo(i)).Range("AF65536").End(xlUp).Row).Copy
  Sheets("ETP").Range("B65536").End(xlUp).Offset(1, 0).PasteSpecial _
  (xlPasteValues)
Next i
Application.CutCopyMode = False
End Sub

Réponse 2 / 3

astridlet
29 déc. 2010 à 11:38

c'est parfait merci!

Réponse 3 / 3

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
29 déc. 2010 à 20:23

De rien, au plaisir de te relire sur le forum
Bonnes Fêtes

Discussions similaires

Dessiner avec son clavier et avec des lettres

Comment faire le signe de croix (chrétiens) ?

dessin au clavier cannabis

Comment faire le symbole coeur vide/coeur blanc

dessin ASCII

Discussions similaires

Newsletters