In Excel is een aftekenformulier aangemaakt. Wanneer ik een handtekening wil zetten in een klein vakje is dit zeer lastig. Is het ook mogelijk om, wanneer ik het vakje aanklik, hem automatisch te laten vergroten?
Vraag
Alle reacties
Je kan altijd de cel permanent vergroten door "Merge & center" te gebruiken.
Truth is like a language with no native speakers left.
Its poetry is speechless and it can’t be caught in human being’s breath.
Bedankt voor je reactie, echter dan toch een kleine toevoeging op mijn vraag.
Wanneer de handtekening is gezet moet er via een simpele "sluiten" knop de cel weer terug gaan naar zijn oorspronkelijke formaat.
Wat er dus word gecreëerd is een blad met handtekeningen die alleen wanneer je hem invult vergroten.
Wanneer de handtekening is gezet moet er via een simpele "sluiten" knop de cel weer terug gaan naar zijn oorspronkelijke formaat.
Wat er dus word gecreëerd is een blad met handtekeningen die alleen wanneer je hem invult vergroten.
Ik denk niet dat Excel hier een ingebouwde functie voor heeft. Wel heb ik met een snelle google het volgende gevonden: https://excel.tips.net/T0...nly_the_Current_Cell.html
Truth is like a language with no native speakers left.
Its poetry is speechless and it can’t be caught in human being’s breath.
Hartelijk dank voor het uitzoeken.
Helaas is er dus geen functie voor.
Helaas is er dus geen functie voor.
Verwijderd
Ik heb een macrotje voor je opgenomen, misschien dat je er wat aan hebt;
Sub Macro1()
'
' Macro1 Macro
'
'
Range("D8").Select
ActiveWindow.Zoom = True
Range("D6").Select
ActiveWindow.Zoom = 100
End Sub
Moet je wat pauze inlassen tussen de Select en Zoom functies om het te kunnen zien.
Sub Macro1()
'
' Macro1 Macro
'
'
Range("D8").Select
ActiveWindow.Zoom = True
Range("D6").Select
ActiveWindow.Zoom = 100
End Sub
Moet je wat pauze inlassen tussen de Select en Zoom functies om het te kunnen zien.
[ Voor 16% gewijzigd door Verwijderd op 10-03-2017 16:02 ]
Als je op je sheet, rechtermuisknop en dan view code en dan dit plakt:
"Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$2" Then
ActiveWindow.Zoom = True
Else
ActiveWindow.Zoom = False
End If
End Sub"
Waarbij $A$2 je cell is. Zodra je daarna een andere cell selecteert is je zoom weer weg.
"Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$2" Then
ActiveWindow.Zoom = True
Else
ActiveWindow.Zoom = False
End If
End Sub"
Waarbij $A$2 je cell is. Zodra je daarna een andere cell selecteert is je zoom weer weg.
Beste Raznov,
Jou oplossing lijkt mij ideaal.
Kun je mij echter aangeven hoe ik precies die view code moet vinden?
Als ik rechtermuisknop doe, kan die die functie niet vinden.
Ik werk met Excel 2013
Jou oplossing lijkt mij ideaal.
Kun je mij echter aangeven hoe ik precies die view code moet vinden?
Als ik rechtermuisknop doe, kan die die functie niet vinden.
Ik werk met Excel 2013
Alt-F11. En natuurlijk opslaan als macro-enabled bestand. Maar ik adviseer je met klem om je eerst even in te lezen in de basics van Excel VBA: bijv. [google=intro to excel vba]. Dit omdat het anders te makkelijk is om foutjes te maken / onverwacht gedrag te zien. Nooit zomaar code copypasten die je niet begrijpt
'Multiple exclamation marks,' he went on, shaking his head, 'are a sure sign of a diseased mind' (Terry Pratchett, Eric)
Beste mslamp,
Zou u misschien het Excel sheet willen delen, ik zoek namelijk precies zoiets maar kom er niet uit qua cel opbouw om er in te tekenen.
Mvg. Mark
Zou u misschien het Excel sheet willen delen, ik zoek namelijk precies zoiets maar kom er niet uit qua cel opbouw om er in te tekenen.
Mvg. Mark
@muppet1986, ik weet niet of @mslamp nog actief is op de site aangezien ik geen nieuwe reacties zie. Sowieso is je vraag op 1 plek stellen genoeg, dus laten we het bij Handtekening tekenen in Excel houden
'Multiple exclamation marks,' he went on, shaking his head, 'are a sure sign of a diseased mind' (Terry Pratchett, Eric)
Pagina: 1
Dit topic is gesloten.