RE: Margini per il testo sui bottoni
Antonio
"FrEma" ha scritto:
> Salve a tutti.
> Non riesco ad impostare i margini sui CommandButton creati con VBA su un
> foglio di excel.
> Il CommandButton ha dei margini cosi' ampi che devo usare un carattere
> microscopico per far si che si veda tutto il testo, p.e. il tasto [Registra].
> (Create un CommandButton con Height=18, Width=51, Caption="Registra" e
> Font="Arial" con dimensione 10)
> L'alternativa e' usare tasti enormi...
> Come risolvo?
> Grazie.
>
> Nota: Il problema e' relativo ai CommandButton e non ai Button.
Non sono molto pratico di VB ma dovresti avere una cosa del genere
Sub CreaPulsante()
ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1",
Link:=False _
, DisplayAsIcon:=False, Left:=249.75, Top:=30.75, Width:=125.25, _
Height:=22.5).Select
End Sub
dove:
Left = Posizione pulsante da sx a dx rispetto al foglio
Top = Posizione pulsante dall'alto verso il basso rispetto al foglio
Width = Larghezza pulsante
Height = Altezza pulsante
variando queti valori cambi la dimensione e il posizionamento del pulsante
Spero di esserti stato di aiuto
Ciao
Antonio
FrEma
>
> Non sono molto pratico di VB ma dovresti avere una cosa del genere
>
>
> Sub CreaPulsante()
>
> ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1",
> Link:=False _
> , DisplayAsIcon:=False, Left:=249.75, Top:=30.75, Width:=125.25, _
> Height:=22.5).Select
> End Sub
>
> dove:
> Left = Posizione pulsante da sx a dx rispetto al foglio
> Top = Posizione pulsante dall'alto verso il basso rispetto al foglio
> Width = Larghezza pulsante
> Height = Altezza pulsante
>
> variando queti valori cambi la dimensione e il posizionamento del pulsante
>
> Spero di esserti stato di aiuto
> Ciao
> Antonio
Caro Antonio
non mi sei d'aiuto purtroppo ma ti posso aiutare io...
Per creare un CommandButton e ridimensionarlo e spostarlo a piacimento basta
attivare la barra degli strumenti "Moduli" e clikkare su "pulsante".
Il problema sono i margini...
I margini: questi sconosciuti...
Grazie lo stesso.
Ciao
Franz Verga
*FrEma* ha scritto:
Meglio quello della barra degli strumenti "Strumenti di controllo": ha molte
più proprietà, compresa la possibilità di definire la posizione del testo
descrittivo, cosa che Antonio ti ha suggerito di fare direttamente via
codice...
--
Spero d'esserti stato d'aiuto.
Ti ringrazio anticipatamente per il riscontro.
Ciao
Franz Verga
Mauro Gamberini
> molte più proprietà, compresa la possibilità di definire la posizione del
> testo descrittivo, cosa che Antonio ti ha suggerito di fare direttamente
> via codice...
>
Ma siete sicuri di aver capito cosa ha chiesto
FrEma? Non di posizionare il pulsante rispetto
al foglio, ma di posizionare l'etichetta del pulsante
(il testo tipo: CommandButton1).
Non so se sia possibile e se penso si debba
ricorrere alle API.
--
---------------------------
Mauro Gamberini
http://www.riolab.org/
Franz Verga
*Mauro Gamberini* ha scritto:
>> Meglio quello della barra degli strumenti "Strumenti di controllo":
>> ha molte più proprietà, compresa la possibilità di definire la
>> posizione del testo descrittivo, cosa che Antonio ti ha suggerito di
>> fare direttamente via codice...
>>
>
> Ma siete sicuri di aver capito cosa ha chiesto
> FrEma? Non di posizionare il pulsante rispetto
> al foglio, ma di posizionare l'etichetta del pulsante
> (il testo tipo: CommandButton1).
Questo l'avevo capito, ma avevo scambiato la proprietà che servono ad
indicare la posizione del pulsante sul foglio con delle proprietà che
indicassero la posizione del testo sul pulsante... Leggera confusione... :-)
> Non so se sia possibile e se penso si debba
> ricorrere alle API.
Su questo non mi pronuncio, se lo dici tu ci credo... ;-)
--
Ciao
Franz Verga
fernando cinquegrani
"FrEma" <Fr...@discussions.microsoft.com> ha scritto nel messaggio
news:F402D4B5-ECF0-4165...@microsoft.com...
> Salve a tutti.
> Non riesco ad impostare i margini sui CommandButton creati con VBA su
> un
> foglio di excel.
> Il CommandButton ha dei margini cosi' ampi che devo usare un carattere
> microscopico per far si che si veda tutto il testo, p.e. il tasto
> [Registra].
> (Create un CommandButton con Height=18, Width=51, Caption="Registra" e
> Font="Arial" con dimensione 10)
> L'alternativa e' usare tasti enormi...
> Come risolvo?
nulla vieta di sostituire il pulsante con un controllo
immagine che aggancia la stessa routine.
lo shape rettangolo con fondo grigio chiaro e
bordo grigio scuro è un pulsante senza effetti 3D.
.f
fernando cinquegrani
"fernando cinquegrani" <f.cinq...@xroxxmxxxa.it> ha scritto nel
messaggio news:en31Ox0G...@TK2MSFTNGP02.phx.gbl...
> nulla vieta di sostituire il pulsante con un controllo
> immagine che aggancia la stessa routine.
> lo shape rettangolo con fondo grigio chiaro e
> bordo grigio scuro è un pulsante senza effetti 3D.
ho predisposto un giochino:
http://www.prodomosua.eu/zips/bottoncini.xls
.f
fernando cinquegrani
http://www.google.it/groups?threadm=B39B30BB-DB73-4BDC...@microsoft.com
>> nulla vieta di sostituire il pulsante con un controllo
>> immagine che aggancia la stessa routine.
>> lo shape rettangolo con fondo grigio chiaro e
>> bordo grigio scuro è un pulsante senza effetti 3D.
>
> A me serve il CommandButton perche' si puo' disabilitare.
> Quando non voglio che la routine venga avviata posso disabilitare il
> bottone. Se qualcuno sa disabiltare il button sono disposto a
> prenderlo in considerazione... ma fino ad allora mi rivolgo al
> CommandButon.
> Si attendono consigli attinenti. :-)
natuuralmente se si simula un bottone, bisogna simularne
anche le caratteristiche.
cfr:
http://www.prodomosua.eu/zips/bottoncini2.xls
(i colori sono impossibili; bisogna perderci un po'
un po' di tempo per una simulazione realistica)
.f