Hur man multiplicerar alla celler i ett intervall med en konstant
Vill du se till att alla konstanter i ett intervall multipliceras med en faktor? Du kan uppnå detta genom att smart använda EDIT - INSERT CONTENT -funktionen.
Det är lättare om du använder följande makro:
Använd subfaktor ()
Dim Cell As Range
Dim inmatningsvärde så länge
Inmatningsvärde = InputBox ("Ange faktorn (t.ex. 100)")
För varje cell i urval
Om inte (Cell.HasFormula) Då
Cell.Formula = "=" & Cell.Value & "*" & Val (ingångsvärde)
Avsluta om
Nästa cell
Avsluta Sub
I det första steget väljer du ett cellintervall i en tabell. Följande bild visar ett exempel på ett markerat område.
Ring sedan makrot. Excel frågar nu i ett fönster om den faktor du vill använda. Följande bild visar detta fönster:
Bekräfta definitionen av faktorn med OK -knappen.
Excel går nu igenom alla celler i urvalet. Endast cellerna där det inte finns någon formel ändras. De multipliceras med den inmatade faktorn. Excel anger det nya värdet som en formel i cellen. Följande bild visar hur resultatet kan se ut:
Om du vill ange siffrorna som konstanter, ersätt raden "Cell.Formula" med följande uttryck:
Cell.Value = Cell.Value * Val (ingångsvärde)
Genom att ange en faktor mindre än en kan du också dela cellerna med en konstant.
Konvertera en formel till en konstant med hjälp av ett makro: Hur man konverterar en beräkning med VBA till ett absolut värde
Du vill konvertera cellerna i ett intervall till absoluta värden. Du kan göra detta interaktivt genom att kopiera området och sedan klistra in det som värden. Lämpligt kommando kallas "Redigera - Klistra in special" i Excel upp till version 2003 och "Start - Klistra in - Klistra in special" i Excel från version 2007.
Om du vill konvertera enskilda celler i ett makro hjälper följande programkod dig:
SubValueConvert ()
Med ActiveSheet.Range ("a1")
.Formel = .Värde
Sluta med
Avsluta Sub
Makrot konverterar det aktuella innehållet i cell A1 i den aktiva tabellen till ett absolut värde.
