Pb avec la copie de cellule en VBA si le contenu est > 911 car.
11 réponses
tutor0
Auriez-vous été confronté à ce pb :
range("D1").value=range ("A1").value marche quelque soit la taille du
contenu de la cellule, mais range("D1:D2").value = range("A1:A2").value
plante si la cellule A1 ou A2 possède un contenu de taille supérieure à 911
car.
Oui, tu as raison, même cette méthode semble liée à 911 caractères.
Salutations!
"Oliv'" <(supprimerceci) a écrit dans le message de news:
Bonjour Tutor0)
les perfs s'en ressentent
tu peux aussi utiliser ceci :
Dim Tblo As Variant Tblo = Range("D1:D2").Value Range("A1").Resize(UBound(Tblo, 1)) = Tblo
désolé michdenis mais ca ne marche pas !
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Pour me joindre : http://cerbermail.com/?V8r2o1YHl4 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Oui, tu as raison, même cette méthode semble liée à 911 caractères.
Salutations!
"Oliv'" <(supprimerceci)catteau@ricour-assurances.fr> a écrit dans le message de news: eLZsHFw2FHA.3912@TK2MSFTNGP15.phx.gbl...
Bonjour Tutor0)
les perfs s'en ressentent
tu peux aussi utiliser ceci :
Dim Tblo As Variant
Tblo = Range("D1:D2").Value
Range("A1").Resize(UBound(Tblo, 1)) = Tblo
désolé michdenis mais ca ne marche pas !
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Oui, tu as raison, même cette méthode semble liée à 911 caractères.
Salutations!
"Oliv'" <(supprimerceci) a écrit dans le message de news:
Bonjour Tutor0)
les perfs s'en ressentent
tu peux aussi utiliser ceci :
Dim Tblo As Variant Tblo = Range("D1:D2").Value Range("A1").Resize(UBound(Tblo, 1)) = Tblo
désolé michdenis mais ca ne marche pas !
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Pour me joindre : http://cerbermail.com/?V8r2o1YHl4 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
