Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pounet95
Bonsoir,
Reagrdes l'aide en ligne au mot HasFormula :
Worksheets("Sheet1").Activate Set rr = Application.InputBox( _ prompt:="Select a range on this worksheet", _ Type:=8) If rr.HasFormula = True Then MsgBox "Every cell in the selection contains a formula" End IfBonne soirée -- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ Conseillé : http://dj.joss.free.fr/netiquet.htm (charte, nétiquette, conseils, abréviations, souriettes...) http://www.excelabo.net/mpfe/connexion.php (connexion, conseils...)
"jive7" a écrit dans le message de news:
Bonjour, voià un truc tout bête je crois savez-vous comment on fait pour dire 'si ma cellule commence par = alors..??
C'est pour repérer les cellules avec formule et celle avec texte.
pour l'instant j'ai cà :
If Cells(i, 8).Formula = "=*" Then Cells(i, 8).EntireRow.Delete
Merci
Bonsoir,
Reagrdes l'aide en ligne au mot HasFormula :
Worksheets("Sheet1").Activate
Set rr = Application.InputBox( _
prompt:="Select a range on this worksheet", _
Type:=8)
If rr.HasFormula = True Then
MsgBox "Every cell in the selection contains a formula"
End IfBonne soirée
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)
"jive7" <jive7@discussions.microsoft.com> a écrit dans le message de news:
D4BA600C-08FD-4388-900C-E0754E5DC7D0@microsoft.com...
Bonjour, voià un truc tout bête je crois
savez-vous comment on fait pour dire 'si ma cellule commence par =
alors..??
C'est pour repérer les cellules avec formule et celle avec texte.
pour l'instant j'ai cà :
If Cells(i, 8).Formula = "=*" Then Cells(i, 8).EntireRow.Delete
Worksheets("Sheet1").Activate Set rr = Application.InputBox( _ prompt:="Select a range on this worksheet", _ Type:=8) If rr.HasFormula = True Then MsgBox "Every cell in the selection contains a formula" End IfBonne soirée -- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ Conseillé : http://dj.joss.free.fr/netiquet.htm (charte, nétiquette, conseils, abréviations, souriettes...) http://www.excelabo.net/mpfe/connexion.php (connexion, conseils...)
"jive7" a écrit dans le message de news:
Bonjour, voià un truc tout bête je crois savez-vous comment on fait pour dire 'si ma cellule commence par = alors..??
C'est pour repérer les cellules avec formule et celle avec texte.
pour l'instant j'ai cà :
If Cells(i, 8).Formula = "=*" Then Cells(i, 8).EntireRow.Delete
Merci
Clément Marcotte
Bonjour,
Moi je pense que ce serait plus simple si tu utilisais la réponse qu'Ardus Petus à faite à Jean-Paul V, tout près d'ici.
"jive7" a écrit dans le message de news:
Bonjour, voià un truc tout bête je crois savez-vous comment on fait pour dire 'si ma cellule commence par = alors..??
C'est pour repérer les cellules avec formule et celle avec texte.
pour l'instant j'ai cà :
If Cells(i, 8).Formula = "=*" Then Cells(i, 8).EntireRow.Delete
Merci
Bonjour,
Moi je pense que ce serait plus simple si tu utilisais la réponse qu'Ardus
Petus à faite à Jean-Paul V, tout près d'ici.
"jive7" <jive7@discussions.microsoft.com> a écrit dans le message de news:
D4BA600C-08FD-4388-900C-E0754E5DC7D0@microsoft.com...
Bonjour, voià un truc tout bête je crois
savez-vous comment on fait pour dire 'si ma cellule commence par =
alors..??
C'est pour repérer les cellules avec formule et celle avec texte.
pour l'instant j'ai cà :
If Cells(i, 8).Formula = "=*" Then Cells(i, 8).EntireRow.Delete
