[RISOLTO]Filtrare All'apertura

di
Luca1994
il
47 risposte

47 Risposte - Pagina 2

  • L
    Luca1994
    Utente Attivo
    Iscritto da
    dic, 2021
    Messaggi:
    62

    Re: [RISOLTO]Filtrare All'apertura

    muttley005 ha scritto:

    2 cose:
    1) devi usare i TAG code per regolamento oltre che per facilitare la lettura/riconoscimento
    2) hai mostrato come costruisci il filtro non come filtri
    @muttley005
    Scusami non ho capito in che senso come filtro ? uso le caselle combinate in base al valore che inserisco si filtra la sottomaschera in automatico
  • muttley005
    muttley005
    Utente Attivo
    Iscritto da
    apr, 2015
    Messaggi:
    360

    Re: [RISOLTO]Filtrare All'apertura

    Quindi hai usato le "nuove" maschere divise?
  • L
    Luca1994
    Utente Attivo
    Iscritto da
    dic, 2021
    Messaggi:
    62

    Re: [RISOLTO]Filtrare All'apertura

      [quote=muttley005 post_id=8689461 time=1651757222 user_id=16696]
Quindi hai usato le "nuove" maschere divise?
[/quote]
@muttley005 , Certamente ho usato questo codice..

DoCmd.OpenForm "SottomascheraElencoImmobili", acNormal, "", _
"Stato like 'Proponibile*'", ,acNormal

Ho provato anche a modificarla

DoCmd.OpenForm "MascheraImmobile", acNormal, "", _
"CboStato like 'Proponibile*'", ,acNormal
 
ma niente...
    • O
      OsvaldoLaviosa
      Super Famoso
      Iscritto da
      apr, 2012
      Messaggi:
      7501

      Re: [RISOLTO]Filtrare All'apertura

      Luca1994: continui a non usare i TAG. Come si fa?
      1. Sotto il rettangolo dove si scrivono i messaggi c'è un pulsante "Editor completo & Anteprima"
      2. Si apre un rettangolo di scrittura più grande con in alto alcuni comandi di FORMATTAZIONE.
      3. Dopo aver scritto righe di codice, DEVI selezionarle tutte (solo quelle del codice), cliccare in alto sul tasto </> (code).
      4. Clicca poi in basso su Anteprima per vedere se appare con i tipici caratteri monotype più familiari ai programmatori.

      Considera anche che ogni tuo messaggio può essere MODIFICATO cliccando sul tasto in alto con l'icona a matita, quindi puoi procedere come ti ho su indicato.
    • L
      Luca1994
      Utente Attivo
      Iscritto da
      dic, 2021
      Messaggi:
      62

      Re: [RISOLTO]Filtrare All'apertura

      OsvaldoLaviosa ha scritto:

      Luca1994: continui a non usare i TAG. Come si fa?
      1. Sotto il rettangolo dove si scrivono i messaggi c'è un pulsante "Editor completo & Anteprima"
      2. Si apre un rettangolo di scrittura più grande con in alto alcuni comandi di FORMATTAZIONE.
      3. Dopo aver scritto righe di codice, DEVI selezionarle tutte (solo quelle del codice), cliccare in alto sul tasto </> (code).
      4. Clicca poi in basso su Anteprima per vedere se appare con i tipici caratteri monotype più familiari ai programmatori.

      Considera anche che ogni tuo messaggio può essere MODIFICATO cliccando sul tasto in alto con l'icona a matita, quindi puoi procedere come ti ho su indicato.

      IMG20220505192328.jpg
      IMG20220505192328.jpg

      Intendi cosi ?
    • O
      OsvaldoLaviosa
      Super Famoso
      Iscritto da
      apr, 2012
      Messaggi:
      7501

      Re: [RISOLTO]Filtrare All'apertura

      Esatto. Ma mi raccomando solo per il testo relativo a CODICE. Le frasi descrittive devono rimanere con la formattazione normale.
    • Gianni55
      Gianni55
      Utente Attivo
      Iscritto da
      mag, 2017
      Messaggi:
      408

      Re: [RISOLTO]Filtrare All'apertura

      Luca1994 ha scritto:

        [quote=muttley005 post_id=8689461 time=1651757222 user_id=16696]
Quindi hai usato le "nuove" maschere divise?
[/quote]
@muttley005 , Certamente ho usato questo codice..

DoCmd.OpenForm "SottomascheraElencoImmobili", acNormal, "", _
"Stato like 'Proponibile*'", ,acNormal

Ho provato anche a modificarla

DoCmd.OpenForm "MascheraImmobile", acNormal, "", _
"CboStato like 'Proponibile*'", ,acNormal
 
ma niente...
        Mah se stai usando le "Nuove Maschere Divise" non ci sono sottomaschere...o no?
        Io non vedo alcuna cboStato bensì una txtbox, qualora vi fosse una cbostato e necessario precisare se a colonna singola o multipla.
        Perchè Openform?...da dove fai la chiamata?
      • L
        Luca1994
        Utente Attivo
        Iscritto da
        dic, 2021
        Messaggi:
        62

        Re: [RISOLTO]Filtrare All'apertura

        Gianni55 ha scritto:

        Luca1994 ha scritto:

          [quote=muttley005 post_id=8689461 time=1651757222 user_id=16696]
Quindi hai usato le "nuove" maschere divise?
[/quote]
@muttley005 , Certamente ho usato questo codice..

DoCmd.OpenForm "SottomascheraElencoImmobili", acNormal, "", _
"Stato like 'Proponibile*'", ,acNormal

Ho provato anche a modificarla

DoCmd.OpenForm "MascheraImmobile", acNormal, "", _
"CboStato like 'Proponibile*'", ,acNormal
 
ma niente...
          Mah se stai usando le "Nuove Maschere Divise" non ci sono sottomaschere...o no?
          Io non vedo alcuna cboStato bensì una txtbox, qualora vi fosse una cbostato e necessario precisare se a colonna singola o multipla.
          Perchè Openform?...da dove fai la chiamata?
          Ciao, quelle sono formule prova che ho inserito per vedere se riuscivo a filtrarlo ma niente, cmq nella maschera principale ho una cbo invece nella sottomaschera ho la Txtbox
        • Gianni55
          Gianni55
          Utente Attivo
          Iscritto da
          mag, 2017
          Messaggi:
          408

          Re: [RISOLTO]Filtrare All'apertura

          Se è così nella sottomaschera inserisci su caricamento (Load)
          Private Sub Form_Load()
Dim Criterio As String
Criterio = "[Stato Immobile] =" & "Proponibile"
Me.Filter = Criterio
Me.FilterOn = True
End Sub
          Ora è chiaro che tutto funziona se quel campo si chiami realmente "Stato Immobile" te lo preciso perchè nella tua funzione dove stabilisci i criteri, non è proprio cosi, scrivi: 
          ...If Not IsNull(Me.CboStato) Then strDati = strDati & " AND [Stato] = " & Chr(34) & Me.CboStato & Chr(34)...
          quindi il criterio deve diventare: 
          Criterio = "Stato =" & "Proponibile"
        • L
          Luca1994
          Utente Attivo
          Iscritto da
          dic, 2021
          Messaggi:
          62

          Re: [RISOLTO]Filtrare All'apertura

          Gianni55 ha scritto:

          Se è così nella sottomaschera inserisci su caricamento (Load)
          Private Sub Form_Load()
Dim Criterio As String
Criterio = "[Stato Immobile] =" & "Proponibile"
Me.Filter = Criterio
Me.FilterOn = True
End Sub
          Ora è chiaro che tutto funziona se quel campo si chiami realmente "Stato Immobile" te lo preciso perchè nella tua funzione dove stabilisci i criteri, non è proprio cosi, scrivi: 
          ...If Not IsNull(Me.CboStato) Then strDati = strDati & " AND [Stato] = " & Chr(34) & Me.CboStato & Chr(34)...
          quindi il criterio deve diventare: 
          Criterio = "Stato =" & "Proponibile"
          Function FiltraDati()
Dim strDati As String
Dim Scegli, StrScelta As String
If Not IsNull(Me.CboMediazione) Then strDati = strDati & " AND [Mediazione] = " & Chr(34) & Me.CboMediazione & Chr(34)
If Not IsNull(Me.CboStato) Then strDati = strDati & " AND [Stato] = " & Chr(34) & Me.CboStato & Chr(34)
If Not IsNull(Me.CboVia) Then strDati = strDati & " AND [Via] = " & Chr(34) & Me.CboVia & Chr(34)End Sub
          questo è una parte del codice che naturalmente si ripete per ogni casella combinata inoltre come si vede dalla foto ogni casella ha un pulsante per rimuovere i filtri singolarmente
          Private Sub Comando65_Click()
CboRiferimento = Null
Call FiltraDati
Me.ElencoImmobili.Form.Requery
          Ho provato il tuo codice ma non funziona, questo è il mio
        • Gianni55
          Gianni55
          Utente Attivo
          Iscritto da
          mag, 2017
          Messaggi:
          408

          Re: [RISOLTO]Filtrare All'apertura

          "non funziona" detto così va bene solo per il Tostapane.
          Dovresti dire dove metti quel codice, come lo hai scritto ed il risultato ottenuto.
          E' chiaro che quello che ho scritto io l'ho
          già testato e funziona.
        • L
          Luca1994
          Utente Attivo
          Iscritto da
          dic, 2021
          Messaggi:
          62

          Re: [RISOLTO]Filtrare All'apertura

          Gianni55 ha scritto:

          "non funziona" detto così va bene solo per il Tostapane.
          Dovresti dire dove metti quel codice, come lo hai scritto ed il risultato ottenuto.
          E' chiaro che quello che ho scritto io l'ho
          già testato e funziona.
          Ho seguito le tue istruzioni nella sottomaschera su load ho inserito il codice naturalmente modificando i campi , chiudo e riapro e non accade nulla
          IMG20220506103724.jpg
          IMG20220506103724.jpg


          IMG20220506103719.jpg
          IMG20220506103719.jpg

        • Gianni55
          Gianni55
          Utente Attivo
          Iscritto da
          mag, 2017
          Messaggi:
          408

          Re: [RISOLTO]Filtrare All'apertura

          Ti viene difficile fare un copia/incolla del codice che hai scritto
        • @Alex
          @Alex
          Super Famoso
          Iscritto da
          feb, 2012
          Messaggi:
          8751

          Re: [RISOLTO]Filtrare All'apertura

          Ovviamente questo lo vedete che è sbagliato a prescindere...? 
          Criterio = "[Stato Immobile] =" & "Proponibile"
          Proverei così
          
Criterio = "[Stato Immobile] ='Proponibile'"
          Non entro nel merito non avendo la visione di insieme del problema(non ho letto il 3D).
        • L
          Luca1994
          Utente Attivo
          Iscritto da
          dic, 2021
          Messaggi:
          62

          Re: [RISOLTO]Filtrare All'apertura

          @Alex ha scritto:

          Ovviamente questo lo vedete che è sbagliato a prescindere...? 
          Criterio = "[Stato Immobile] =" & "Proponibile"
          Proverei così
          
Criterio = "[Stato Immobile] ='Proponibile'"
          Non entro nel merito non avendo la visione di insieme del problema(non ho letto il 3D).
          Grazie Alex Adesso Funziona nella sottomaschera come mi avevano suggerito sopra , ma il problema sussiste io vorrei che la mia cboStato avesse il valore già impostato su proponibile (All'aperuta )e all'occorrenza poterla modificare in base alle mie esigenze , in questo modo non ho concluso anzi
        Devi accedere o registrarti per scrivere nel forum
        47 risposte