V této kapitole se naučíte, jak pomocí VBA v aplikaci Microsoft Excel změnit všechny buňky v aktivním listu na hodnoty.
Vezměme si příklad a pochopíme, jak píšeme kód VBA pro změnu hodnoty buněk v aktivním listu.
Jak změnit hodnotu všech buněk v aktivním listu?
Máme data v Excelu, ve kterém chceme nahradit hodnotu všech buněk pouze hodnotou buňky.
Postupujte podle níže uvedených kroků:-
- Stisknutím Alt+F11 otevřete aplikaci Visual Basic
- V programu VBAProject poklepejte na list 1
- Zadejte níže uvedený kód VBA
Sub Values_1 () With ActiveSheet.UsedRange Range ("A1: I7"). Value = Range ("A2"). Value End With End Sub
- Kód spustíte stisknutím klávesy F5
- Hodnota buňky A2 bude aktualizována v definovaném rozsahu
Jak změnit hodnotu z první tabulky do druhé tabulky?
Máme 2 stoly, 1Svatý rozsah stolu je A3: I5 a 2nd rozsah stolu je A8: I10. Chceme nahradit hodnotu 1Svatý tabulka s hodnotou 2 tabulky v aktivním listu.
Chcete-li změnit hodnotu, postupujte podle níže uvedených kroků a kódu:-
- Otevřete aplikaci Visual Basic
- Zadejte níže uvedený kód:-
Sub Values_1 () With ActiveSheet.UsedRange Range ("A3: I5"). Value = Range ("A8: I10"). Value End With End Sub
- Spusťte kód stisknutím klávesy F5
- Hodnoty budou aktualizovány
Pokud se vám naše blogy líbily, sdílejte je se svými přáteli na Facebooku. A také nás můžete sledovat na Twitteru a Facebooku.
Rádi bychom od vás slyšeli, dejte nám vědět, jak můžeme zlepšit, doplnit nebo inovovat naši práci a zlepšit ji pro vás. Napište nám na e -mail