22. december 2011 - 22:26Der er
17 kommentarer og 1 løsning
Opdater når celler redigeres
Jeg har en userform med en graf i.
koden ser sådan ud: Dim ChartNum As Integer
Private Sub UserForm_Initialize() ChartNum = 1 UpdateChart End Sub
Private Sub PreviousButton_Click() If ChartNum = 1 Then ChartNum = 3 Else ChartNum = ChartNum - 1 UpdateChart End Sub
Private Sub NextButton_Click() If ChartNum = 3 Then ChartNum = 1 Else ChartNum = ChartNum + 1 UpdateChart End Sub
Private Sub CloseButton_Click() Unload Me End Sub
Private Sub UpdateChart()
Set CurrentChart = Sheets("Charts").ChartObjects(ChartNum).Chart CurrentChart.Parent.Width = 300 CurrentChart.Parent.Height = 150
' Save chart as GIF Fname = ThisWorkbook.Path & Application.PathSeparator & "temp.gif" CurrentChart.Export FileName:=Fname, FilterName:="GIF"
' Show the chart Image1.Picture = LoadPicture(Fname) End Sub
Jeg vil gerne have, at når man redigerer i området A1:D10, så afspilles "UpdateChart" i userformen. Dvs. altså sige, at grafen skal opdatere når data ændres.
Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
Godt det fungerer efter hensigten. Hermed mit svar :o)
Glædelig jul og godt nytår, Nicolai
Synes godt om
Ny brugerNybegynder
Din løsning...
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.