[VBA] Cell kopieren incl tekst opmaak

[-W0kk3L-]

Wie kan mij helpen. Ik probeer een cell te kopieren van een ander werkblad naar het huidige. Mijn huidige zoekopdracht is alsvolgt:

code:

Zoek_conditie = Worksheets("Blaadje").Cells.Find(What:=zoekCond, After:=Range("B1"), _
                  LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByColumns, _
                  SearchDirection:=xlNext, MatchCase:=False).Offset(0, 1).Value

Van de bovenstaande opdracht krijg ik keurig resultaat. Echter de tekst die vet gedrukt of italic is, wordt niet meegenomen naar het resultaat. Hoe krijg ik dit voor elkaar?

[ThunderNet]

Ik weet neit of het werkt.. maar je pakt nu de .Value als je ipv de .Value nou het hele object eens kopieert?

[-W0kk3L-]

Ik denk dat ik inderdaad iets anders dan Value moet meegeven, net zoals bij PasteSpecial. Alleen de vraag is wat. Als ik trouwens paste via een speciale manier, kan ik ook niet kiezen voor alleen tekst incl opmaak. Het is OF de tekst, OF de opmaak (en de opmaak in dat geval is de opmaak van de cell en daar ben ik juist niet in geinteresseerd).

[Verwijderd]

Volgens mij als je de copy function gebruikt, dat ie dan alles meeneemt.

A fin, misschien dat je hier wat aan hebt.

[-W0kk3L-]

Maar even een kleine kick....

Bovenstaande functies resulteren helaas niet in wat ik wil. Wat ik probeer te bereiken is het kopieren van tekst van een cel op tabblad 1 naar een cel op tabblad 2, waarbij zowel de tekst en de opmaak van de tekst (zoals vet gedrukt en kleur van de tekst) worden meegekopieerd. De opmaak van de cel zelf (zoals kleur, randen etc) hoeft niet mee. Suggesties?