programma per archivio dvd

[raimea]

vers. 3.1
questa dovrebbe essere la ver. finale
sono gia precaricati circa 700 attori, e 320 registi.
lo zip contiene anche una piccola/ breve guida..

http://www.sendspace.com/file/z898l5

[ricky53]

Scarico e provo.

Mi faccio risentire.

[raimea]

ciao a tutti
ho inserito un nuvo foglio - tipo - che mi servirebbe per poter stampare , solo il tipo di dvd che seleziono in cella F3
vorrei riuscire a realizzare una macro che in base a cio che scrivi in F3 mi compila i campi nel foglio -tipo-
partendo da cella F6 , ed andando a cercare in -foglio 1-, e prelevando tutti i dati relativi a quel tipo.
allego il file.
vi ringrazio, ciao

http://www.sendspace.com/file/6nj72v

[Avatar3]

Ho scaricato il file ma all'apertura ho una serie di errori
1) non trova l'UserForm indicato
2) non trova delle dll
insomma non riesco ad utilizzarlo e nemmeno ad aiutarti

ciao

[Anthony47]

Ho anche io l' errore "Impossibile trovare l' oggetto o la libreria" sul file pubblicato. Comunque credo che potresti risolvere cosi':
Registra una macro mentre, da partendo da foglio Tipo cella A1
-Selezioni Foglio1
-Selezioni col C e applichi il filtro automatico
-Scegli come filtro il valore CD
-Copi le celle filtrate, andando oltre l' ultima riga con dati
-Selezioni foglio Tipo
-Selezioni F6
-Menu /Incolla-speciale/Valori
-Tasto Esc

Poi sostituisci nella macro la voce Criteria1:="CD" con =Sheets("Tipo").Range("F3").Value

Infine crea una macro di WorksheetChange, che su variazione di F3 chiama la macro registrata.

Credo che questo livello di suggerimento ti sia sufficiente... se no posta ancora.

Ciao

[raimea]

ho provato con il registratore , ma per ora non funge.
provo a rimettere on.linee il file

http://www.sendspace.com/file/aedamq

(ho visto che il collegamento al file precedente, in realta sempra che il server non trovi il file,
ma dopo qualche secondo di ricerca ora lo trova.)

[raimea]

ok , dopo 1000 prove ce lo fatta
seguendo le dritte di antony
ecco la macro con cui ho risolto

Codice: Seleziona tutto

Sub tipofiltra()

ActiveSheet.Unprotect

Range("F6:L1000").Select  ' cancello il contenuto
    Selection.ClearContents
   
    Sheets("Foglio1").Select
    ActiveSheet.Unprotect
    Selection.AutoFilter
    Selection.AutoFilter Field:=3, Criteria1:=Sheets("Tipo").Range("F3").Value
    Range("B3:H1000").Select
    Selection.Copy
    Sheets("tipo").Select
    Range("F6").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("Foglio1").Select
    Application.CutCopyMode = False
    Selection.AutoFilter Field:=3
    Selection.AutoFilter
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFormattingColumns:=True, AllowFormattingRows:=True
    Range("D1").Select
    Sheets("tipo").Select
   
    Columns("f:l").EntireColumn.AutoFit  ' adatto la larghezza delle colonne
        Cells.Rows.AutoFit
   
   
    ActiveWindow.DisplayGridlines = False
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFormattingColumns:=True, AllowFormattingRows:=True

   
    Range("E1").Select


End Sub

in realta' non so perche vi da problemi di dll , e non trova la usefotm...???
provero' su altri pc.
comunque x ora come al solito grazie

[Anthony47]

ok , dopo 1000 prove ce lo fatta

Bravo!
Alla prossima...

[ivo]

bel lavo ben fatto !
premesso che quello che sto per dire non è una critica, ma vuole essere un semplice consiglio per migliorare il già ottimo programma, adesso mi domando una cosa...
in un film non c'è un solo attore: pensa a Pulp fiction gli attori sono John Travolta, Uma Thurman, Samuel L. Jackson e Bruce Willis
Un'altra cosa sarebbe bella, ma questa è proprio una chicca
conosco un programma che si chiama IMDB-Grab: tu gli dai il titolo e lui tira fuori tutti i dati che nel tuo programma si dovrebbero inserire a mano, compresa la recensione. Sarebbe bello poter interagire con quel database o con il programma per importare in automatico i dati. Magari chi è più esperto di me può improntare la cosa...
io sono disponibilissimo a testare il tutto.

Poi la sparo grossa, ma a questo punto se il programma diventa troppo grosso come mole di dati non era meglio partire a memorizzare tutto in un database di access e poi generare delle maschere di inserimento, visualizzazione e report per la stampa?

Anche a costo di ripetermi, lavoro ben fatto ! Queste sono solo dei miei consigli per migliorare il già ottimo programma.

[raimea]

sicuramente belle idee.., ma per me e' sufficente cosi e' ad uso " casaligo",
per i cartoni dei figli e qualche film.
- l'ho impostato in excell ( con molte ore di prove....), perche' non conosco acces.
- non cono il programma IMDB-Grab.

sicuramente tutte le modifiche sono bem accette.
grazie per i complimenti . ciao

[ivo]

access un po' lo conosco: riesco ad impostare le tabelle con le relazioni, creare varie maschere (menù, inserimento, visualizzazione, stampa) e a creare vari report.
e posso assicurarti che per la memorizzazione di molti dati è sicuramente meglio di excel.
Volendo potrei sbizzarrirmi a ricreare il tuo progetto in access, ma poi se non conosci il programma, non sapresti dove metterci le mani.
L'idea di passare ad access, era solo perché tu sei così gentile da mettere a disposizione il tuo lavoro agli altri. Noi tutti, me compreso, non possiamo sapere l'esigenza che possono avere "gli atri" e quindi portare il tutto in access, farebbe in modo che miliardi di record vengano gestiti meglio che con excel.

IMDB-grub è gratuito: provalo!
Tanto per capire cosa fa.

P.D.
adesso entro nel sofistico...
possiamo dire che c'è per creare questo "programma ben fatto" c'è stata una collaborazione stile "bazar" e non in stile cattedrale (mi riferisco al saggio "La cattedrale e il bazar" di Eric S. Raymond), allora ci si potrebbe spingere un po' più in là e convertire il file in un formato libero e rendere il tutto compatibile con OpenOffice / LibreOffice ...

[raimea]

vers 3.4
ora c'e il foglio - tipo-
dove poter filtrare per tipo e fare la relativa stampa.
metto a disposz il file

http://www.sendspace.com/file/x6a6hu

per ivo hai un mp
ciao a tutti

[raimea]

aiuto....
ho dovuto formattare il pc.
ora questo file non mi funziona piu' ....
mi dice

errore di compilazione, impossibile trovare il progetto o la libreria

lo stesso file su un altro pc funziona correttamente
che mi manca ?...
su questo pc.


grazie

[Flash30005]

Vai nel vba e cerca i riferimenti mancanti
aggiungi la libreria che manca
e tornerà a funzionare

ciao