Lettertype wijzigen van keuzelijst met invoervak

[edvanan]

Hallo budy's
Is het mogelijk om een bestand of werkblad op te slaan met een commandoknop en als bestandsnaam de inhoud van een bepaalde cel neemt en dat tegelijkertijd ook de ingevulde cellen op 0-waarde springen.
Kan je de lettertype van een keuzelijst met invoervak volgens werkset formulieren veranderen??

Groetjes

 

[kcnuts]

Excel dus.......
maar formuleer de vraag eens anders.
Ik heb het nu een aantal keren gelezen, maar het is niet helemaal duidelijk wat je wilt.

Jan

 

[rhcp]

ja mij is het ook niet zo duidelijk.

 

[Jan van Asseldonk]

1e vraag:
Neem de hele procedure op in een macro.
Pas dan de macro aan door aan een variabele de inhoud van de cel met de gewenste naam toe te wijzen
Vervang in de macro dan de naam door de variabele.

voorbeeld:

OPGENOMEN:
Sub Opslaan()
'
Range("A1").Select
ActiveWorkbook.SaveAs FileName:="H:\Excel\MapOpslaan.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
End Sub

AANGEPAST (gewenste naam staat in A1):
Sub Opslaan()
Dim Bestandsnaam As String

Bestandsnaam = Range("A1").Value
'
Range("A1").Select
ActiveWorkbook.SaveAs FileName:=Bestandsnaam, FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
End Sub


2e vraag:
Kijk eens hier. Mogelijk kom je daar verder mee.