Newsgroup: it.comp.appl.access
Titolo: Report da query ma 1 etichetta con altra origine, SI PUO'?

Ciao a tutti,
è possibile avere un report generato da una query ma che una casella
di testo del report si prenda il valore dentro una maschera?
Casomai in vba come posso dirgli di prendersi il valore?
Grazie a tutti il NG!
Fabio

 ha scritto nel messaggio 
news:1177330744.2...@o5g2000hsb.googlegroups.com...


[risposta]
Gestisci l'evento "su formattazione" della sezione che contiene la casella 
di testo inserendoci:
Me!nomeCasellaDiTesto=Forms!nomeForm!nomeCasellaDiTesto
Ciao.
-- 
Sergio MAZZA 

 Me!nomeCasellaDiTesto=Forms!nomeForm!nomeCasellaDiTesto
Purtroppo ho visto che il valore che vorrei portare dalla form al
report è all'interno di una combobox che ha come tipo origine riga:
"Tabella/query" e come Origine riga:
"SELECT DISTINCTROW [03 Anagrafica Compagnia].[Contatore], [03
Anagrafica Compagnia].[Compagnia] FROM [03 Anagrafica Compagnia];"
Con numero colonne 2.
Credo che creerò una seconda query per includere il dato che mi serve,
ma non so altrimenti come avrei potuto fare......Sono niubbo con
access...
:)
Fabio

 access...
La query della query non funziona...ehm, male......Come posso inserire
il nome compagnia quando riesco ad ottenere nel report il codice
compagnia ma non il nome??
Help plz!
Fabio

La query della query non funziona...ehm, male......Come posso inserire
il nome compagnia quando riesco ad ottenere nel report il codice
compagnia ma non il nome??
----------------
Risposta :
----------------
..... Forms!nomeForm!nomeCasellaDiTesto.column(1)
-- 
-- 
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media."


Non va neanche così....Ho scritto in etichetta:
=Forms!frmAnagraficaClienti_sfrmConsultazioneDirettaTitolo!
cmbCompagniaTit.column(1)
poi anche con il (2) ma continua a non inserirmi il valore.
PERCHE'??

 ha scritto nel messaggio 
news:1177330744.2...@o5g2000hsb.googlegroups.com...


Come ti ha suggerito Sergio, gestisci l'evento su formattazione della 
sezione dove è inserita la casella di testo.
Leggi bene il nome della casella di testo...
Me!nomeCasellaDiTesto = Forms!nomeForm!nomeCasellaDiTesto
Se sulla maschera hai una combo provvedi di alimentarla con una query che 
abbia anche il valore che ti interessa: 
p.es
.: ID, CodiceDitta, NomeDitta e 
opportunamente mettere a 3 le colonne:
Me!nomeCasellaDiTesto = Forms!nomeCombo.Column(n) (qui si conta a partire da 
zero quindi regolati.
Se sulla maschera hai una combo e non puoi non vuoi avere anche il valore 
che ti interessa ma solo l'id restituito dalla combo:
Me!nomeCasellaDiTesto = Dlookup("PerEsempioNomeDitta","TuaTabellaDitta", 
"TuoIDDitta=" & Forms!nomeCombo).
Ciao, Carlo

 Ciao, Carlo
Vi ringrazio tutti di cuore, funziona!
Non dovrò scrivere a mano le lettere!!

 ha scritto nel messaggio 
news:1177345853.0...@o5g2000hsb.googlegroups.com...
cut
Vi ringrazio tutti di cuore, funziona!
Non dovrò scrivere a mano le lettere!!
Ok per i ringraziamenti ma non dici come hai risolto e dove stava 
l'inghippo.
Ciao, Carlo 


Ops scusami....
Praticamente mi trovavo una maschera con una combobox che prendeva
coppie di dati, codice e nome compagnia. Nel report non sapevo come
inserire il nome e mi compariva il codice.
Tra l'altro avevo dato origine del report una query e non riuscivo a
"prendere" i dati presenti nella form.
Quindi ho tolto origine dati dal report e ho inserito il codice in vba
per far prendere i dati dalla query e per la singola casella di testo
la colonna corretta della combobox della form:
Private Sub IntestazioneGruppo2_Format(Cancel As Integer, FormatCount
As Integer)
Me!Testo88 = Forms!frmAnagraficaClienti_sfrmConsultazioneDirettaTitolo!
cmbCompagniaTit.Column(2)
End Sub
Private Sub Report_Open(Cancel As Integer)
Me.RecordSource = "qry_Ricevuta_Pagamento_Titolo"
End Sub
Tutto funziona!
Adesso sto cercando di inserire un codicillo con IIF per far comparire
una frase in una casella di testo se compare la scritta responsabilità
civile auto e un'altra frase per tutti gli altri casi.
Credo debba essere una cosa di questo tipo in origine dati casella di
testo :
IIF([DescrizioneRamo]="responsabilità civile auto", certificato e
contrassegno, quietanza);
Ma certamente chiederò un aiuto al NG, prima guarderò gli altri post.
Non sono esperto di access ma con l'aiuto che mi avete dato e leggendo
il NG inizio ad entrare un poco meglio nella logica di vba....
Ciao!
:)
Fabio





