Forum Sketchup Artlantis Archicad
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Annonces
Bonjour Invité Bienvenue sur le forum biblio3d - le forum a été créé le Sam 19 Jan 2008 - 14:26- Nous avons enregistrés 14746 topics pour un total de : 174987 posts - le record de membres connectés simultanément :555
Galerie


Excell et liste de choix - Page 2 Empty
Ton bloc notes
Derniers sujets
» [ SKETCHUP composants dynamiques ]
par Miroslav Hier à 19:26

» [ SKETCHUP composants dynamiques ] Masquer valeur attribut
par Manutio Mar 21 Mai 2024 - 14:02

» [ SKETCHUP objets ] tiroir cuisine
par tenrev Mar 21 Mai 2024 - 10:31

» [ TWINMOTION ] CONSEIL FORMATION
par tenrev Mar 21 Mai 2024 - 10:17

» [ AUTRES LOGICIELS ] LOGICIEL OFFERT
par jerryvento Ven 17 Mai 2024 - 8:36

» [ LUMION ] 2024 - Importation FBX
par Shakna Jeu 16 Mai 2024 - 10:00

» [ SKETCHUP tutos ] dessiner un dodécaèdre sans plugins
par tenrev Mer 15 Mai 2024 - 14:22

» [ SKETCHUP plugins ] Plugin SOLID INSPECTOR - Nested Instances - Demande de clarification
par tenrev Mer 15 Mai 2024 - 14:13

» [ LUMION ] 2024 - Importation FBX
par Shakna Mer 15 Mai 2024 - 12:16

» [ LUMION ] Lumion 2024
par Shakna Mer 15 Mai 2024 - 11:21

» [ TWINMOTION ] Appliquer un decal avec les outils spacing et area de Twinmotion 2024
par Gaspard Hauser Mar 14 Mai 2024 - 23:12

» [ TWINMOTION ] Nouvelle verion 2024
par Gaspard Hauser Mer 8 Mai 2024 - 10:27

» [ CHAINE TWITCH ] Pas simple de se faire un public
par tenrev Mar 7 Mai 2024 - 19:46

» [ INTELLIGENCE ARTIFICIELLE ] quelques video IA
par tenrev Mar 7 Mai 2024 - 9:47

» [ CHAINE TWITCH ] les replay de mes live sur Twitch
par tenrev Mar 7 Mai 2024 - 9:22

» [ SKETCHUP généralité ] Interpolation progressive entre deux formes le long d'un tracé
par JDD Lun 6 Mai 2024 - 15:19

» [ ARCHICAD ] Création de lucarne en 3D
par VertiKal Lun 6 Mai 2024 - 14:17

» [ SKETCHUP composants dynamiques ]
par simjoubert Lun 6 Mai 2024 - 10:39

» [ SKETCHUP plugins ]
par TIQUETM Dim 5 Mai 2024 - 19:39

» [ ARCHICAD ] raccourci clavier
par Taz Jeu 2 Mai 2024 - 16:04

» [ SKETCHUP Layout ] Layout 2024 probléme de Style
par tenrev Jeu 2 Mai 2024 - 11:58

» [ MATOS INFORM. ] LICENCES ARCHICAD
par yannickniort Mar 30 Avr 2024 - 8:29

» [ SKETCHUP plugins ] Universal Importer
par Samuel Tallet Lun 29 Avr 2024 - 19:18

» [ CHAINE TWITCH ] c'est reparti - pour quelques live
par tenrev Lun 29 Avr 2024 - 14:49

» [ SKETCHUP objets ]
par vick Mar 23 Avr 2024 - 20:52

» [ SKETCHUP vray ]
par furax49 Mar 23 Avr 2024 - 19:52

» [ ARTLANTIS ] Ca donne envie !
par loic46 Dim 21 Avr 2024 - 22:56

» [ SKETCHUP généralité ] sortie officielle de sketchup 2024
par tenrev Ven 19 Avr 2024 - 14:24

» [ ARTLANTIS ] Problème origine se déplace
par loic46 Jeu 18 Avr 2024 - 22:28

» [ SKETCHUP plugins ] Vms_up
par Rascal Jeu 18 Avr 2024 - 14:41

» [ SKETCHUP objets ] aquarium
par JDD Lun 15 Avr 2024 - 22:20

» [ ARCHICAD ] Zone - Menu déroulant
par Christophe Fortineau Jeu 11 Avr 2024 - 19:49

» [ SKETCHUP généralité ] Servimg Premium pour tous les membres
par tenrev Jeu 11 Avr 2024 - 14:31

» [ SKETCHUP plugins ] Move it
par TF3 Mer 10 Avr 2024 - 10:23

» [ SKETCHUP plugins ] curic 2D export
par tenrev Mar 9 Avr 2024 - 17:41

Sondage

Chaine Twitch

Excell et liste de choix - Page 2 Poll_c1029%Excell et liste de choix - Page 2 Poll_c10 29% [ 11 ]
Excell et liste de choix - Page 2 Poll_c1011%Excell et liste de choix - Page 2 Poll_c10 11% [ 4 ]
Excell et liste de choix - Page 2 Poll_c103%Excell et liste de choix - Page 2 Poll_c10 3% [ 1 ]
Excell et liste de choix - Page 2 Poll_c108%Excell et liste de choix - Page 2 Poll_c10 8% [ 3 ]
Excell et liste de choix - Page 2 Poll_c108%Excell et liste de choix - Page 2 Poll_c10 8% [ 3 ]
Excell et liste de choix - Page 2 Poll_c108%Excell et liste de choix - Page 2 Poll_c10 8% [ 3 ]
Excell et liste de choix - Page 2 Poll_c1029%Excell et liste de choix - Page 2 Poll_c10 29% [ 11 ]
Excell et liste de choix - Page 2 Poll_c105%Excell et liste de choix - Page 2 Poll_c10 5% [ 2 ]

Total des votes : 38

chaine sketchup.tv
Serveur Discord
Le Deal du moment :
Cartes Pokémon EV6.5 : où trouver le ...
Voir le deal

Excell et liste de choix

Page 2 sur 2 Précédent  1, 2

Voir le sujet précédent Voir le sujet suivant Aller en bas

ga
ga
Moulin à parole
Moulin à parole
Masculin Humeur : boiseuse ......
Date d'inscription : 02/01/2010
Nombre de messages : 312
Points : 363
Age : 47
Localisation : Chez moi !........
Emploi : Charpentier

Messagega Jeu 16 Sep 2010 - 19:24

haaaa un autre amoureux d'excel ? rigole

-------------------------------------------------------------------------------------------------------------------------
_"Ne compte pas les jours, fais en sorte que chaque jour compte"
Bonne journée à vous !!!!!

Jérôme
Fab
Fab
modérateur
modérateur
Masculin Humeur : Rester COOL......
Date d'inscription : 03/10/2008
Nombre de messages : 4823
Points : 5411
Age : 57
Localisation : Normandie
Emploi : Dessinateur en bâtiment et génie civil
https://www.pinterest.fr/lignesvintage/_saved/

MessageFab Ven 17 Sep 2010 - 8:36

ga a écrit:haaaa un autre amoureux d'excel ? rigole
Oui à ce propos, je cherche une application pour classer mes plans sous Excel, mais de manière à faire une recherche par N° de plans ou de noms de rue? ou il y a peut être un logiciel pour ca? merci gentleman

-------------------------------------------------------------------------------------------------------------------------
Dites-vous bien que dans la vie, ne pas reconnaître son talent, c'est favoriser la réussite des médiocres.  p-clin  
Autocad | Photoshop | Sketchup pro |
avatar
jojo2
modérateur
modérateur
Date d'inscription : 14/11/2009
Nombre de messages : 135
Points : 170

Messagejojo2 Ven 17 Sep 2010 - 9:37

Salut,

Comment sont gérées tes données actuellement?

Les fonctions de tri ou recherche de base ne peuvent-elles suffire?

Cordialement.
Fab
Fab
modérateur
modérateur
Masculin Humeur : Rester COOL......
Date d'inscription : 03/10/2008
Nombre de messages : 4823
Points : 5411
Age : 57
Localisation : Normandie
Emploi : Dessinateur en bâtiment et génie civil
https://www.pinterest.fr/lignesvintage/_saved/

MessageFab Ven 17 Sep 2010 - 10:45

jojo2 a écrit:Salut,

Comment sont gérées tes données actuellement?

Les fonctions de tri ou recherche de base ne peuvent-elles suffire?

Cordialement.
Aujourd'hui le classement de mes plans sont uniquement par rue, comme je travail dans une commune,le classement employé était par rue quand je suis arrivé mais je suis ouvert à toutes propositions.. gentleman

-------------------------------------------------------------------------------------------------------------------------
Dites-vous bien que dans la vie, ne pas reconnaître son talent, c'est favoriser la réussite des médiocres.  p-clin  
Autocad | Photoshop | Sketchup pro |
avatar
jojo2
modérateur
modérateur
Date d'inscription : 14/11/2009
Nombre de messages : 135
Points : 170

Messagejojo2 Ven 17 Sep 2010 - 10:48

Mais les données sont-elles saisies dans un fichier Excel?
ga
ga
Moulin à parole
Moulin à parole
Masculin Humeur : boiseuse ......
Date d'inscription : 02/01/2010
Nombre de messages : 312
Points : 363
Age : 47
Localisation : Chez moi !........
Emploi : Charpentier

Messagega Sam 18 Sep 2010 - 9:12

salut

Tu voudrais classer / chercher des classeurs enregistrées sous un n° de plans se trouvant dans un dossier ou alors c'est juste des n° de plans se trouvant dans la m^me feuille r ?

-------------------------------------------------------------------------------------------------------------------------
_"Ne compte pas les jours, fais en sorte que chaque jour compte"
Bonne journée à vous !!!!!

Jérôme
Fab
Fab
modérateur
modérateur
Masculin Humeur : Rester COOL......
Date d'inscription : 03/10/2008
Nombre de messages : 4823
Points : 5411
Age : 57
Localisation : Normandie
Emploi : Dessinateur en bâtiment et génie civil
https://www.pinterest.fr/lignesvintage/_saved/

MessageFab Sam 18 Sep 2010 - 9:55

ga a écrit:salut

Tu voudrais classer / chercher des classeurs enregistrées sous un n° de plans se trouvant dans un dossier ou alors c'est juste des n° de plans se trouvant dans la m^me feuille r ?
pour les donées elles ne sont pas dans un fichier excel et il y en a pas...
le fait de classer par n° indexée me parait bien. saispas

-------------------------------------------------------------------------------------------------------------------------
Dites-vous bien que dans la vie, ne pas reconnaître son talent, c'est favoriser la réussite des médiocres.  p-clin  
Autocad | Photoshop | Sketchup pro |
ga
ga
Moulin à parole
Moulin à parole
Masculin Humeur : boiseuse ......
Date d'inscription : 02/01/2010
Nombre de messages : 312
Points : 363
Age : 47
Localisation : Chez moi !........
Emploi : Charpentier

Messagega Sam 18 Sep 2010 - 11:01

Mais alors pourquoi vouloir te servir excel ?

-------------------------------------------------------------------------------------------------------------------------
_"Ne compte pas les jours, fais en sorte que chaque jour compte"
Bonne journée à vous !!!!!

Jérôme
ga
ga
Moulin à parole
Moulin à parole
Masculin Humeur : boiseuse ......
Date d'inscription : 02/01/2010
Nombre de messages : 312
Points : 363
Age : 47
Localisation : Chez moi !........
Emploi : Charpentier

Messagega Sam 18 Sep 2010 - 17:56

Salut

à jojo2 : je viens de régler mon problème de variable
il suffi de mettre les Sub "ImprimerOriginalCopie" et "Enregister" dans le même module et de déclarer ma variante "ControlImprimer" ainsi "Dim ControlImprimer As Integer" en premiere ligne avant toutes les sub langue comme ça ma variante reste en memoire pour toutes les sub du module bien
Merci à ce cite http://jml85.pagesperso-orange.fr/Pages/Excel/Cours/Ecrit/Cours8.html bien
Code:
Dim ControlImprimer As Integer

Sub ImprimerOriginalCopie_QuandClic()
'
'
'
' Touche de raccourci du clavier: Ctrl+i
 If (Range("G1").Value = "") Then
 LaisserLaTva.Show
End If

    With ActiveSheet.PageSetup
.BlackAndWhite = True
End With
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
   
    With ActiveSheet.PageSetup
.BlackAndWhite = Faste
End With
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

If Sheets("Devis").Range("G1").Value = ("1") And Range("A10").Value = "DEVIS" Then
 
 Sheets("TVA 5,5%").Select
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
    Sheets("Devis").Select
 End If
 ControlImprimer = 1

End Sub
Sub ImprimerOriginal_QuandClic()

'
'
'
    With ActiveSheet.PageSetup
.BlackAndWhite = Faste
End With
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
    ControlImprimer = 1
   
 
End Sub

Sub ImprimerPDF()
 
'lancer l'impression du fichier sur PDFcreator
 
    Application.ActivePrinter = "PDFCreator sur Ne00:"
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
        "PDFCreator sur Ne00:", Collate:=True
       
End Sub


Sub Enregister()

If ControlImprimer = 0 Then
If MsgBox("Vous n'avez pas inprimer ce document !" & vbCrLf _
                    & "Il ne vous sera plus possible de le faire après avoir cliqué sur Ok", _
                    vbOKCancel, "Contrôle d'Impression") = vbCancel Then Exit Sub
End If


 If (Range("G1").Value = "") Then
 LaisserLaTva.Show
End If

 If (Range("A10").Value = "DEVIS") Then
 With ActiveSheet
            Dossier = CStr(.Range("A10").Value)
            Fichier = CStr(.Range("d11").Value) & (.Range(" B5").Value) & (.Range("A2").Value) & Format(Date, " dd-mm-yyyy")
            DossierMere = "J:\devis"
            End With
      If Trim(Dossier) = "" Then Exit Sub
      If Trim(Fichier) = "" Then Exit Sub
Dim Nom As String
Nom = [b5]
Sheets("Devis").Copy
ActiveWorkbook.SaveAs "j:" & Dossier & "" & Fichier & ".xls"
Workbooks("Devis&Facture++.xls").Close False

Else

  TTC = Sheets("Devis").Range("E97").Value
  Sheets("Chiffre d'affaire").Range("A500").End(xlUp).Offset(1, 0).Value = TTC
 
 With ActiveSheet
 
            Dossier = CStr(.Range("A10").Value)
            Fichier = CStr(.Range("d11").Value) & " " & (.Range(" B5").Value) & Format(Date, " dd-mm-yyyy")
            DossierMere = "J:\devis"
            End With
      If Trim(Dossier) = "" Then Exit Sub
      If Trim(Fichier) = "" Then Exit Sub

Nom = [b5]
Sheets("Devis").Copy
ActiveWorkbook.SaveAs "J:" & Dossier & "" & Fichier & ".xls"

'sélectionne un classeur
Workbooks("Devis&Facture++.xls").Activate

  Sheets("Sauvegarde").Select
    Range("A2:E99").Select
    Selection.Copy
    Sheets("Devis").Select
    Range("A2:E99").Select
    ActiveSheet.Paste
    Range("B5").Select
    Sheets("Sauvegarde").Select
    Range("B5").Select
    Application.CutCopyMode = False
   
   
   
Sheets("Options").Range("e2").Value = Sheets("Options").Range("e2").Value + 1


    Sheets("Devis").Select
    Rows("41:94").Select
    Selection.EntireRow.Hidden = True
    ActiveWindow.SmallScroll Down:=-51
    Range("B5").Select
    Workbooks("Devis&Facture++.xls").Close True
   

   
End If

End Sub





-------------------------------------------------------------------------------------------------------------------------
_"Ne compte pas les jours, fais en sorte que chaque jour compte"
Bonne journée à vous !!!!!

Jérôme
avatar
jojo2
modérateur
modérateur
Date d'inscription : 14/11/2009
Nombre de messages : 135
Points : 170

Messagejojo2 Sam 18 Sep 2010 - 22:45

Oui, c'est aussi une solution. bien

La solution que je t'avais proposée donnait le même résultat même si les sub n'étaient pas dans le même module.
Code:
Public ControlImprimer as Integer
Excellent, le lien que tu cites.
++
ga
ga
Moulin à parole
Moulin à parole
Masculin Humeur : boiseuse ......
Date d'inscription : 02/01/2010
Nombre de messages : 312
Points : 363
Age : 47
Localisation : Chez moi !........
Emploi : Charpentier

Messagega Dim 19 Sep 2010 - 9:09

Exacte sa marche également , j'avais pas compris qu'il fallait mettre cette déclaration de variante avant les sub rouge .
merci à toi jojo2 :icon_wink:

-------------------------------------------------------------------------------------------------------------------------
_"Ne compte pas les jours, fais en sorte que chaque jour compte"
Bonne journée à vous !!!!!

Jérôme
Fab
Fab
modérateur
modérateur
Masculin Humeur : Rester COOL......
Date d'inscription : 03/10/2008
Nombre de messages : 4823
Points : 5411
Age : 57
Localisation : Normandie
Emploi : Dessinateur en bâtiment et génie civil
https://www.pinterest.fr/lignesvintage/_saved/

MessageFab Dim 19 Sep 2010 - 10:34

ga a écrit:Mais alors pourquoi vouloir te servir excel ?
en fait je suis à la recherche d'un log pour classer mes plans alors toutes les bonnes idées sont les bienvenue. :icon_wink:

-------------------------------------------------------------------------------------------------------------------------
Dites-vous bien que dans la vie, ne pas reconnaître son talent, c'est favoriser la réussite des médiocres.  p-clin  
Autocad | Photoshop | Sketchup pro |
avatar
jojo2
modérateur
modérateur
Date d'inscription : 14/11/2009
Nombre de messages : 135
Points : 170

Messagejojo2 Dim 19 Sep 2010 - 10:47

Salut Fab,
Excel est un très bon choix pour créer une classification.

Tu saisis simplement tes données en tables (feuilles) et tu pourras toujours exporter tes données vers un logiciel plus spécialisé plus tard.

Le plus gros travail est en amont, c'est à dire le choix d'ordonnancement de tes données.
Le reste, ça se travaille directement dans Excel.
Fab
Fab
modérateur
modérateur
Masculin Humeur : Rester COOL......
Date d'inscription : 03/10/2008
Nombre de messages : 4823
Points : 5411
Age : 57
Localisation : Normandie
Emploi : Dessinateur en bâtiment et génie civil
https://www.pinterest.fr/lignesvintage/_saved/

MessageFab Lun 20 Sep 2010 - 8:41

respect respect Jojo

-------------------------------------------------------------------------------------------------------------------------
Dites-vous bien que dans la vie, ne pas reconnaître son talent, c'est favoriser la réussite des médiocres.  p-clin  
Autocad | Photoshop | Sketchup pro |
Contenu sponsorisé

MessageContenu sponsorisé

Page 2 sur 2 Précédent  1, 2

Voir le sujet précédent Voir le sujet suivant Revenir en haut

Créer un compte ou se connecter pour répondre

Vous devez être membre pour répondre.

S'enregistrer

Rejoignez notre communauté ! C'est facile !


S'enregistrer

Connexion

Vous êtes déjà membre ? Aucun soucis, cliquez ici pour vous connecter.


Connexion

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum