Hoe alle cellen in een bereik met een constante te vermenigvuldigen?
Wilt u ervoor zorgen dat alle constanten in een bereik met een factor worden vermenigvuldigd? Dit doe je door slim gebruik te maken van de EDIT - INSERT CONTENT functie.
Het is makkelijker als je de volgende macro gebruikt:
Gebruik subfactor ()
Dim cel als bereik
Dim ingangswaarde As Long
Invoerwaarde = InputBox ("Voer de factor in (bijv. 100)")
Voor elke cel in selectie
Zo niet (Cell.HasFormula) Dan
Cell.Formula = "=" & Cell.Value & "*" & Val (invoerwaarde)
Stop als
Volgende cel
Einde sub
Selecteer in de eerste stap een celbereik in een tabel. De volgende afbeelding toont een voorbeeld van een gemarkeerd gebied.
Roep dan de macro aan. Excel vraagt nu in een venster naar de factor die je wilt gebruiken. De volgende afbeelding toont dit venster:
Bevestig de definitie van de factor met de OK-knop.
Excel doorloopt nu alle cellen in de selectie. Alleen de cellen waarin geen formule staat, worden gewijzigd. Ze worden vermenigvuldigd met de ingevoerde factor. Excel voert de nieuwe waarde in als formule in de cel. De volgende afbeelding laat zien hoe het resultaat eruit kan zien:
Als u de getallen als constanten wilt invoeren, vervangt u de regel "Cell.Formula" door de volgende uitdrukking:
Cell.Value = Cell.Value * Val (invoerwaarde)
Door een factor kleiner dan één in te voeren, kunt u de cellen ook delen door een constante.
Een formule converteren naar een constante met behulp van een macro: een berekening met VBA converteren naar een absolute waarde
U wilt de cellen van een bereik converteren naar absolute waarden. U kunt dit interactief doen door het gebied te kopiëren en vervolgens als waarden te plakken. Het juiste commando heet "Bewerken - Plakken speciaal" in Excel tot versie 2003 en "Start - Plakken - Plakken speciaal" in Excel vanaf versie 2007.
Als u afzonderlijke cellen in een macro wilt converteren, helpt de volgende programmacode u:
SubWaardeConverteren ()
Met ActiveSheet.Range ("a1")
.Formule = .Waarde
Eindigt met
Einde sub
De macro converteert de huidige inhoud van cel A1 in de actieve tabel naar een absolute waarde.
