Microsoft
Software
Hardware
Network
Question : Bouton de VB sur le rendement à exceler
Bonjour, le
I ont le code que les sorties pour exceler de l'accès et préformate le bilan. je regarde pour incorporer d'un certain des boutons VB au spreadsheet.
So que je voudrais que les les boutons les options donnent utilisateur au nombre le plus élevé de sorte au nombre le plus peu élevé près sur certain columns
So par exemple, le
Is de la colonne B. là me code peux incorporer au bouton de rendement d'accès qui créerait ces boutons sur le spreadsheet.
Thanks, le
Seamus
Here est mon code courant :
Dim du
Private Command5_Click () strFile comme String
strFile = acOutputTable, « prise absente », acFormatXLS, strFile, oXL de False
Dim comme oWB d'Object
Dim comme oWS d'Object
Dim comme Object
Dim FormulaRow en tant qu'oWB d'oXL du
Set de Long
= de
Set de CreateObject acOutputForm du
'DoCmd.OutputTo de « F:\MissingDataOutput.xls ", prise de Me.Missing, acFormatXLS, strFile, False
DoCmd.OutputTo (le « Excel.Applic
ation ») = l'oWS du
Set d'oXL.Workbooks.Open (strFile
) = oWB.Sheets (oWS
FormulaRow de 1)
With =. Cellules (. Rows.Count, « b »). Extrémité (- 4162). Rangée + 2 'xlUp
. Cells.Font.Size = 10
. Rangées (1).Font.Bold = True
.UsedRange.EntireColumn.Au
toFit
.range (« b : h ») .NumberFormat
= « 0.00% ; [Rouge] 0.00% "
.range (« b : h ») .NumberFormat
= « #, ##0.00 ; [Rouge] #, ##0.00 "
.range (« c : e »). Modèle = « pour cent "
.range (« b : b ») .NumberFormat
= « £#, ##0.00 ; [£# de rouge], ##0.00 "
.range (« f : h ») .NumberFormat
= « £#, ##0.00 ; [£# de rouge], ##0.00 " extrémité With
/>oXL.Visible = oWS de True
Set = oWB de Nothing
Set = oXL de Nothing
Set = Nothing
End Sub
class= de
Réponse : Bouton de VB sur le rendement à exceler
En ce qui concerne le code pour les boutons, souvent vous pouvez obtenir un début en enregistrant un macro pour faire la tâche en question, l'éditant alors comme nécessaire.
Autres solutions
MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
Emplacement primaire de deux SCCM dans l'annuaire actif
L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
Stocker le dossier dans le mysql using connector.net et le champ de goutte
Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
Winzip 12 issues de secours du travail ?