Page 7 sur 10
Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 11:37
par scorpion3917
Lion blanc a écrit : 01 novembre 2019 21:13
Fais gaffe les mémés, elles savent lire les tutos sur les tricots au crochet. ..
L'historique c'est comme les couilles, ça se vide

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 11:48
par Lion blanc
scorpion3917 a écrit : 02 novembre 2019 11:37
Lion blanc a écrit : 01 novembre 2019 21:13
Fais gaffe les mémés, elles savent lire les tutos sur les tricots au crochet. ..
L'historique c'est comme les couilles, ça se vide
Sauf que les couilles sont plus agréablement vidées..

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 12:03
par scorpion3917
Lion blanc a écrit : 02 novembre 2019 11:48
scorpion3917 a écrit : 02 novembre 2019 11:37
L'historique c'est comme les couilles, ça se vide
Sauf que les couilles sont plus agréablement vidées..
Surtout pour un lion qui copule toutes les 2 minutes

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 12:33
par Lion blanc
scorpion3917 a écrit : 02 novembre 2019 12:03
Lion blanc a écrit : 02 novembre 2019 11:48
Sauf que les couilles sont plus agréablement vidées..
Surtout pour un lion qui copule toutes les 2 minutes
Je croyais les lions paresseux ? pas libidineux en tout cas..

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 13:03
par scorpion3917
Lion blanc a écrit : 02 novembre 2019 12:33
scorpion3917 a écrit : 02 novembre 2019 12:03
Surtout pour un lion qui copule toutes les 2 minutes
Je croyais les lions paresseux ? pas libidineux en tout cas..
pas au niveau de la libido en tout cas.
Attention on s éloigne du sujet là

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 15:12
par lepicard
scorpion3917 a écrit : 02 novembre 2019 13:03
Lion blanc a écrit : 02 novembre 2019 12:33
Je croyais les lions paresseux ? pas libidineux en tout cas..
pas au niveau de la libido en tout cas.
Attention on s éloigne du sujet là
bon alors retour au serieux
Code : Tout sélectionner
Sub Copier()
Dim fin&, cel As Range, num$, rep
Application.ScreenUpdating = False
num = Feuil2.Cells(8, 3)
Set cel = Feuil3.Cells.Find(num, , , xlWhole)
If cel Is Nothing Then
1 fin = Feuil3.Range("A" & Rows.Count).End(3).Row + 2
If fin < 4 Then fin = 2
Feuil2.Range("A1:G53").Copy Feuil3.Cells(fin, 1)
Feuil2.Range("A1:G53").Copy
Feuil3.Cells(fin, 1).PasteSpecial Paste:=xlPasteColumnWidths
Feuil3.Cells(fin, 1).PasteSpecial Paste:=xlPasteValuesAndNumberFormats
Feuil2.Cells(1, 1).Select
Feuil2.Cells(11, 6) = ""
MsgBox "Affaire " & Feuil2.Cells(8, 3) & " Copiée dans la feuille Autorisation!!", , "C'est Terminé": Exit Sub
Else
rep = MsgBox("Le Numéro" & num & " Existe déjà," & vbCrLf _
& "S'agit-il d'un additif?", vbCritical + vbYesNo, "Est-ce un Additif?")
If rep = vbYes Then Feuil2.Cells(11, 6) = "Ajout Additif": GoTo 1
If rep = vbNo Then
rep = MsgBox("Le Numéro d'Affaire " & num & " Existe déjà," & vbCrLf _
& "S'agit-il d'un con?", vbCritical + vbYesNo, "Est-ce un con ?"
If rep = vbYes Then Feuil2.Cells(11, 6) = "Ajout con": GoTo 1
If rep = vbNo Then Exit Sub
End If
End If
End Sub
pour faire une liste de GJ par exemple

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 15:28
par lotus95
lepicard a écrit : 02 novembre 2019 15:12
scorpion3917 a écrit : 02 novembre 2019 13:03
pas au niveau de la libido en tout cas.
Attention on s éloigne du sujet là
bon alors retour au serieux
Code : Tout sélectionner
Sub Copier()
Dim fin&, cel As Range, num$, rep
Application.ScreenUpdating = False
num = Feuil2.Cells(8, 3)
Set cel = Feuil3.Cells.Find(num, , , xlWhole)
If cel Is Nothing Then
1 fin = Feuil3.Range("A" & Rows.Count).End(3).Row + 2
If fin < 4 Then fin = 2
Feuil2.Range("A1:G53").Copy Feuil3.Cells(fin, 1)
Feuil2.Range("A1:G53").Copy
Feuil3.Cells(fin, 1).PasteSpecial Paste:=xlPasteColumnWidths
Feuil3.Cells(fin, 1).PasteSpecial Paste:=xlPasteValuesAndNumberFormats
Feuil2.Cells(1, 1).Select
Feuil2.Cells(11, 6) = ""
MsgBox "Affaire " & Feuil2.Cells(8, 3) & " Copiée dans la feuille Autorisation!!", , "C'est Terminé": Exit Sub
Else
rep = MsgBox("Le Numéro" & num & " Existe déjà," & vbCrLf _
& "S'agit-il d'un additif?", vbCritical + vbYesNo, "Est-ce un Additif?")
If rep = vbYes Then Feuil2.Cells(11, 6) = "Ajout Additif": GoTo 1
If rep = vbNo Then
rep = MsgBox("Le Numéro d'Affaire " & num & " Existe déjà," & vbCrLf _
[surligne]& "y a t-il un pilote dans l'avion ?[/surligne]", vbCritical + vbYesNo, [surligne]"va t-il dans le mur [/surligne]?"
If rep = vbYes Then Feuil2.Cells(11, 6) = "Ajout con": GoTo 1
If rep = vbNo Then Exit Sub
End If
End If
End Sub
pour faire une liste de GJ par exemple
pour avoir un diagnostic juste de la situation

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 15:34
par lepicard
lotus95 a écrit : 02 novembre 2019 15:28
lepicard a écrit : 02 novembre 2019 15:12
bon alors retour au serieux
Code : Tout sélectionner
Sub Copier()
Dim fin&, cel As Range, num$, rep
Application.ScreenUpdating = False
num = Feuil2.Cells(8, 3)
Set cel = Feuil3.Cells.Find(num, , , xlWhole)
If cel Is Nothing Then
1 fin = Feuil3.Range("A" & Rows.Count).End(3).Row + 2
If fin < 4 Then fin = 2
Feuil2.Range("A1:G53").Copy Feuil3.Cells(fin, 1)
Feuil2.Range("A1:G53").Copy
Feuil3.Cells(fin, 1).PasteSpecial Paste:=xlPasteColumnWidths
Feuil3.Cells(fin, 1).PasteSpecial Paste:=xlPasteValuesAndNumberFormats
Feuil2.Cells(1, 1).Select
Feuil2.Cells(11, 6) = ""
MsgBox "Affaire " & Feuil2.Cells(8, 3) & " Copiée dans la feuille Autorisation!!", , "C'est Terminé": Exit Sub
Else
rep = MsgBox("Le Numéro" & num & " Existe déjà," & vbCrLf _
& "S'agit-il d'un additif?", vbCritical + vbYesNo, "Est-ce un Additif?")
If rep = vbYes Then Feuil2.Cells(11, 6) = "Ajout Additif": GoTo 1
If rep = vbNo Then
rep = MsgBox("Le Numéro d'Affaire " & num & " Existe déjà," & vbCrLf _
[surligne]& "y a t-il un pilote dans l'avion ?[/surligne]", vbCritical + vbYesNo, [surligne]"va t-il dans le mur [/surligne]?"
If rep = vbYes Then Feuil2.Cells(11, 6) = "Ajout con": GoTo 1
If rep = vbNo Then Exit Sub
End If
End If
End Sub
pour faire une liste de GJ par exemple
pour avoir un diagnostic juste de la situation
diagnostiquer quoi ??? les hopitaux psychiatriques sont surbookés

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 15:40
par oups
De la l'interet d'un mamie "Rodriguesienne " des 2 noeils

+

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 15:46
par lepicard
Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 15:56
par lotus95
If rep = vbNo Then
rep = MsgBox("Le Numéro de scénario" & num & " Existe déjà," & vbCrLf _
& "y a t-il un pilote dans l'avion ?", vbCritical + vbYesNo, "va t-il dans le mur ?"
tu as de la chance que j'ai perdu en pratique, j'aurais pu en rajouter des kms ...

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 16:05
par Crapulax
Je suis une bille en informatique..Si si...
Mais je remercie les forums d'exister,sans eux je n'aurai même pas "pris" internet et je ne me serai même pas acheter un ordinateur.
En plus concernant les forums je n'en ai fait que deux...Celui ou j'ai connu les proprios d'Interaldys et ce dernier...Avec c'est vrai quelques visites sur un troisième,il y a de cela quelques années.
C'est comme le portable..J'en ai un "par obligation" mais jamais il ne me viendrait à l'idée de dépenser de la tune là-dedans...Le mien ne fait même pas internet et m'a coûté 10 euros...
Avec l'assurance de ne jamais risquer me le faire voler(il faudrait déjà tenter de le faire) et sans aucune peur de le perdre ou de le casser.
Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 16:57
par lepicard
Crapulax a écrit : 02 novembre 2019 16:05
Je suis une bille en informatique..Si si...
Mais je remercie les forums d'exister,sans eux je n'aurai même pas "pris" internet et je ne me serai même pas acheter un ordinateur.
En plus concernant les forums je n'en ai fait que deux...Celui ou j'ai connu les proprios d'Interaldys et ce dernier...Avec c'est vrai quelques visites sur un troisième,il y a de cela quelques années.
C'est comme le portable..J'en ai un "par obligation" mais jamais il ne me viendrait à l'idée de dépenser de la tune là-dedans...Le mien ne fait même pas internet et m'a coûté 10 euros...
Avec l'assurance de ne jamais risquer me le faire voler(il faudrait déjà tenter de le faire) et sans aucune peur de le perdre ou de le casser.
En plus que le smart phone , dès qu'il y a un rayon de soleil ,on ne voit rien , franchement c'est naze ,et il ne faut pas avoir la tremblote

,ni des gros doigts
Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 17:03
par Lion blanc
lepicard a écrit : 02 novembre 2019 16:57
Crapulax a écrit : 02 novembre 2019 16:05
Je suis une bille en informatique..Si si...
Mais je remercie les forums d'exister,sans eux je n'aurai même pas "pris" internet et je ne me serai même pas acheter un ordinateur.
En plus concernant les forums je n'en ai fait que deux...Celui ou j'ai connu les proprios d'Interaldys et ce dernier...Avec c'est vrai quelques visites sur un troisième,il y a de cela quelques années.
C'est comme le portable..J'en ai un "par obligation" mais jamais il ne me viendrait à l'idée de dépenser de la tune là-dedans...Le mien ne fait même pas internet et m'a coûté 10 euros...
Avec l'assurance de ne jamais risquer me le faire voler(il faudrait déjà tenter de le faire) et sans aucune peur de le perdre ou de le casser.
En plus que le smart phone , dès qu'il y a un rayon de soleil ,on ne voit rien , franchement c'est naze ,et il ne faut pas avoir la tremblote

,ni des gros doigts
Moi je navigue que sur smartphone, mais faut pas acheter une daube à 150 balles..

Re: Les " illettrés du numérique"
Posté : 02 novembre 2019 17:09
par lepicard
Lion blanc a écrit : 02 novembre 2019 17:03
lepicard a écrit : 02 novembre 2019 16:57
En plus que le smart phone , dès qu'il y a un rayon de soleil ,on ne voit rien , franchement c'est naze ,et il ne faut pas avoir la tremblote

,ni des gros doigts
Moi je navigue que sur smartphone, mais faut pas acheter une daube à 150 balles..
ça doit faire tache dans ta mégane II à 300 balles
Arrete ,on voit rien ,c'est nul ,tout juste bon pour consulter