Visualizzazione dei risultati da 1 a 4 su 4
  1. #1

    salvare documento in automatico con vba

    ciao ragazzi ho inserito questa riga:

    ChDir "C:\Documents and Settings\mmontagnani\Desktop"
    ActiveWorkbook.SaveAs Filename:=TextBox3.Text

    io voglio che mi salvi sul desktop il file con il nome della textbox3 e fino a qui funziona senza problemi,però volevo aggiungere al nome del file savato anche la data e l'ora in modo tale che se anche se il testo inserito nella textbox3 è uguale il file non venga sovrascritto ,perchè cambierebbe la data o magari l'ora ,questo è come vorrei che mi salvasse il file:

    TEXTBOX3_"DATA"_"ORA"

    è possibile? che stringa dovrei aggiungere?
    ciao grazie

  2. #2
    Utente di HTML.it L'avatar di gibra
    Registrato dal
    Apr 2008
    residenza
    Italy
    Messaggi
    4,244
    Così dovrebbe andare:

    codice:
    TextBox3.Text & "_" & Format(Date, "YYYYMMDD") & "-" & Format(Time,"HHNNSS") & ".txt"
    Se TextBox3.Text contiene PIPPO il risultato sarebbe simile a questo:

    PIPPO_20100520_134312.txt


  3. #3
    perfetto funziona alla grande ,avevo un'altra richiesta ,come faccio a far cambiare colore ad una label nella maschera a seconda del risultato

    ecco un esempio:

    label17 =range ("c20")
    quindi nella maschera mi visualizza il valore della cella c20 nella label17,come posso far cambiare di colore "backcolor" con una funzione "if"

    supponiamo che c20 -b3= ad un numero,se questo numero è compreso tra -0.25 e +0.25 la label 17 deve diventare verde altrimenti rosso
    ciao grazie

  4. #4
    Utente di HTML.it L'avatar di gibra
    Registrato dal
    Apr 2008
    residenza
    Italy
    Messaggi
    4,244
    Un Forum non è una chat.

    Forse è il caso che leggi PRIMA il Regolamento.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.