23. april 2009 - 10:24Der er
13 kommentarer og 1 løsning
VBA - Tilføje dynamisk formel til talværdi i mange celler
Hej,
Jeg har en stor mængde af tal som er tastet ind i et regneark. Jeg har brug for at kunne gange alle tal med en faktor, som jeg løbende ændrer. Denne faktor taster jeg i en celle . - eks. A1.
Eksempel: Celleværdi inden ændring: 25 Celleværdi efter ændring: =25*A1
Hvordan får jeg ændret værdien i mine celle uden at jeg manuelt skal ændre dem?
Jeg kan ikke loope igennem den, da mine tal er samlet i mange grupperinger. Det bedste ville være hvis jeg kunne markere dem og klille på en genvejstast (som afspiller en makro) og dermed ændre værdien i cellerne.
supertekst: Der skal indsættes en formel i cellerne. Oyejo: Hvis jeg følger denne fremgangmåde får jeg ingen dynamik ved fremtidig ændring af celle A1.
Jeg skal fremtidigt kunne ændre alle værdierne på en gang ved kun at ændre i cellen A1.
oyejo: Tak for input. Jeg forstår din metode, og jeg bruger den jævnligt. Jeg har flere tusinde celler fordelt på flere ark. Den færdige model skal sendes ud til brugere jeg ikke kan bede om at gøre det du foreslår. Det skal være muligt at ændre alle celler i løbet af få sekunder.
REM: Marker området, der skal modificeres - alternativ skal det defineres.
Sub modificerVærdi() For Each celle In Selection.Cells værdi = celle.Value If værdi <> "" And IsNumeric(værdi) = True Then celle.Formula = "=" & værdi & "* A1" End If Next End Sub
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
