| Home  | Casa  | Hardware  | Networking  | Programmazione  | Software  | Domanda  | Sistemi  |   
Programmazione  
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Java Programming

  • Programmazione Javascript

  • PHP /MySQL Programmazione

  • Perl Programming

  • Python Programming

  • rubino Programmazione

  • Nozioni di base di Visual Programming
  •  
    Conoscenza Informatica >> Programmazione >> Nozioni di base di Visual Programming >> Content
    Come forzare la compilazione di una cartella di lavoro da VB
    linguaggio di programmazione Visual Basic di Microsoft può essere utilizzato per automatizzare le attività che possono spesso essere eseguite manualmente in molti tipi di applicazioni Windows , incluso Microsoft Excel . Compilare i fogli di lavoro di una cartella di lavoro in un documento centrale è una delle cose che si possono fare scrivendo una sceneggiatura applicazione VB . Una volta che lo script è stato scritto , gli utenti verranno salvate la difficoltà e il tempo di dover eseguire manualmente l'attività . Istruzioni
    1

    Aprire l'applicazione Visual Basic che viene utilizzato per creare e modificare codice VB e applicazioni VB - based.
    2

    Creare un nuovo documento di VB e di avviare e nominarne nuovo sub - routine, per esempio :

    CompileWorkbook sub ( )
    3

    ottenere i fogli di lavoro nella cartella di lavoro con l'aggiunta di una seconda linea di codice:
    < p > CompileWorkbook Sub ( ) Dim objX As Object
    4

    prefissa l'obiettivo di routine attraverso la definizione di ciò che farà in particolare :

    CompileWorkbook Sub ( ) Dim objX Come ObjectOn Error Resume nextset objX = Application.CommandBars.FindControl ( Type : = msoControlButton ) economici 5

    Definire ciò che lo script dovrebbe fare se le definizioni non sono in grado di essere soddisfatte con l'aggiunta di un argomento " se non" :

    CompileWorkbook Sub ( ) Dim objX Come ObjectOn Error Resume nextset objX = Application.CommandBars.FindControl ( Type : = msoControlButton ) If Not objX è niente ThenobjX.ExecuteSet objX = Nothing
    6

    chiudere lo script di compilazione con l'aggiunta di dichiarazioni "End " per il codice :

    CompileWorkbook Sub ( ) Dim objX Come ObjectOn Error Resume nextset objX = Application.CommandBars.FindControl ( Type : = msoControlButton ) If Not objX Is Nothing ThenobjX.ExecuteSet objX = NothingEnd IfEnd Sub
    7

    Salva il codice VB e incorporare lo script in un'applicazione VB in cui è necessario eseguire la compilazione cartella di lavoro .
    < br >

    Previous :

    next :
      Articoli Correlati
    ·Come convertire le date alle Date militari in Access 20…
    ·Modi diversi per formattare le date in VBA 
    ·Definizione di eventi in Visual Basic 
    ·Printing Database in Visual Basic 
    ·Come compilare un campo in VB Accesso 
    ·Come accedere VBA per creare un foglio di Excel 
    ·Come creare un gioco per Xbox 360 utilizzando Microsoft…
    ·Come inviare una sequenza tasti per stampare in VB 
    ·Come convertire una stringa in INT in Vb.net 
    ·Come creare una cassetta postale in VBScript 
      Articoli in evidenza
    ·Come unire due risultati MySQL in PHP 
    ·Come accedere VBA Reports 
    ·Come creare un account di accesso in Visual Basic 
    ·Come imparare il codice Flash 
    ·Come disattivare Silverlight Buttons 
    ·Come rimuovere una nuova linea in Python 
    ·Come scrivere una istruzione case in C + + 
    ·Come chiamare una funzione che richiama in VB.NET 
    ·Come fare un Array in VB6 
    ·Come nascondere una riga in un report SSRS 
    Copyright © Conoscenza Informatica http://it.wingwit.com