Hvordan multiplisere alle celler i et område med en konstant
Vil du sikre at alle konstanter i et område multipliseres med en faktor? Du kan oppnå dette ved smart å bruke EDIT - INSERT CONTENT -funksjonen.
Det er lettere hvis du bruker følgende makro:
Bruk subfaktor ()
Dim Cell As Range
Dim inngangsverdi Så lenge
Inngangsverdi = InputBox ("Skriv inn faktoren (f.eks. 100)")
For hver celle i utvalg
Hvis ikke (Cell.HasFormula) Da
Cell.Formula = "=" & Cell.Value & "*" & Val (inngangsverdi)
Slutt om
Neste celle
Slutt Sub
I det første trinnet velger du et celleområde i en tabell. Figuren nedenfor viser et eksempel på et uthevet område.
Ring deretter makroen. Excel spør nå i et vindu om faktoren du vil bruke. Følgende figur viser dette vinduet:
Bekreft definisjonen av faktoren med OK -knappen.
Excel går nå gjennom alle cellene i utvalget. Bare cellene der det ikke er noen formel, blir endret. De multipliseres med den angitte faktoren. Excel angir den nye verdien som en formel i cellen. Følgende figur viser hvordan resultatet kan se ut:
Hvis du vil angi tallene som konstanter, erstatter du linjen "Cell.Formula" med følgende uttrykk:
Cell.Value = Cell.Value * Val (inngangsverdi)
Ved å skrive inn en faktor mindre enn en, kan du også dele cellene med en konstant.
Konvertere en formel til en konstant ved hjelp av en makro: Hvordan konvertere en beregning ved hjelp av VBA til en absolutt verdi
Du vil konvertere cellene i et område til absolutte verdier. Du kan gjøre dette interaktivt ved å kopiere området og deretter lime det inn som verdier. Den aktuelle kommandoen kalles "Rediger - Lim inn spesiell" i Excel opp til versjon 2003 og "Start - Lim inn - Lim inn spesiell" i Excel fra versjon 2007.
Hvis du vil konvertere individuelle celler i en makro, vil følgende programkode hjelpe deg:
SubValueConvert ()
Med ActiveSheet.Range ("a1")
.Formula = .Value
Slutt med
Slutt Sub
Makroen konverterer gjeldende innhold i celle A1 i den aktive tabellen til en absolutt verdi.
