Jeg har lavet et knap i mit excel ark, som jeg ikke kan få til at virke når jeg trykker på... selv om at jeg har beskytte ark og låst den op... hvad gøre jeg fejl
Hvilken type knap er der tale om? Hvad skal knappen gøre, når du klikker på den? Hvilken kode ligger på knappen? Hvad sker der faktisk, når du klikker på den?
ja men jeg har fået den til at køre nu men det enste jeg mangler nu er at jeg og skal have den til at gemme i en database og det kan jeg ikke finde ud af. jeg er ny bebynder i det her. den kode jeg har nu har jeg tage fra et andet excel ark, og de enskaber kan jeg godt bruge... men nu mangler jeg bare at få lavet en kode så den kan gemme i en database kan du hjælp, er den kode jeg har nu Private Sub CheckBox1_Click()
End Sub
Private Sub CommandButton1_Click() Application.ScreenUpdating = True ActiveSheet.Unprotect If Range("K3").Value <> "" Then MsgBox "BILAGET ER ALLEREDE NUMMERERET!!" Exit Sub End If Range("K3").Select Open "\\C\lasse\Øvelser2009\fakt.txt" For Input As #1 Line Input #1, a$ Close #1 fak = Val(a$) fak = fak + 1 Open "\\C\lasse\Øvelser2009\fakt.txt" For Output As #1 Print #1, Str(fak) Close #1 ActiveCell.FormulaR1C1 = Str(fak) Range("b9").Select ' Gemmer fakturaen med fakturanummer som filnavn og udskriver den i to kopier filnavn = Str(Range("K3")) VUPTI = "\\C\lasse\Øvelser2009\Øvelser\" & filnavn & ".XLS" ActiveWorkbook.SaveAs Filename:=VUPTI, FileFormat:=xlNormal, Password:="", Writerespassword:="", ReadOnlyRecommended:=False, CreateBackup:=False ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True ActiveWindow.Close End Sub
den kode har jeg brugt da jeg lavet et excell program, til at gemme små fakture, så derfor tro jeg bare man kunne bruge den samme, og så bare ændre hvor det skulle lægge henne, jeg bruger samme kode og sammt txt. men gemmer dem i anden mappe.
Så det er altså bare fakturanummeret, der skal gemmes?
I så fald skal du bare rette "\\C\lasse\Øvelser2009\fakt.txt" til den nye placering og så skal du sørge for at FAKT.TXT faktisk også ligger på denne placering.
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.