Avatar billede tida Juniormester
04. januar 2007 - 12:24 Der er 4 kommentarer og
1 løsning

Makro til indsætning af lighedstegn

Jeg har brug for en lille makro der default indsætter = ført i cellen i et givent ark i en given kolonne, kan nogen hjælpe mig med det ?
Avatar billede excelent Ekspert
04. januar 2007 - 15:16 #1
indsætter = i den aktive celle

Sub tst()
ActiveCell = "=" & ActiveCell
End Sub
Avatar billede tida Juniormester
04. januar 2007 - 15:22 #2
Måske jeg formulerede mig for dårligt - Jeg prøver lige igen.

Når jeg arbejder i ark1 skal makroen sørge for at indsætte = hvergang jeg indsætter beløb i kolonne G - ellers ikke.
Avatar billede excelent Ekspert
04. januar 2007 - 15:38 #3
Højreklik på arkets fane,- vis programkode,- indsæt koden

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("G:G")) Is Nothing Then Exit Sub
If IsNumeric(Target) Then Target = "=" & Target
End Sub
Avatar billede tida Juniormester
04. januar 2007 - 16:48 #4
tak, mægtig - smid et svar
Avatar billede excelent Ekspert
04. januar 2007 - 16:54 #5
ok
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester