4337 résultats trouvés

par frangy
25 novembre 2016, 10:30
Forum : Excel - VBA
Sujet : Syntaxe formule sélection de plage avec colonne variable
Réponses : 4
Vues : 998

Re: Syntaxe formule sélection de plage avec colonne variable

Bonjour,

Pour aller au plus simple :
La colonne K porte le numéro 11.
La plage comporte 7 cellules et débute à la 8ème ligne.
Sub Test()
Dim Col As Integer
    Col = 11
    Cells(8, Col).Resize(7).Select
End Sub
A+
par frangy
23 novembre 2016, 23:07
Forum : Excel - VBA
Sujet : Remplir une feuille en fonction de valeurs de cellules
Réponses : 12
Vues : 511

Re: Remplir une feuille en fonction de valeurs de cellules

L'erreur vient du fait que tu utilises un tableau. Les lignes vides de ce tableau sont prises en compte dans la détermination de la dernière ligne à traiter, ce qui induit une erreur puisque la quantité est nulle et une recopie sur 0 ligne n'a pas de sens. Le plus simple est d'ajouter un test pour l...
par frangy
23 novembre 2016, 20:35
Forum : Excel - VBA
Sujet : Remplir une feuille en fonction de valeurs de cellules
Réponses : 12
Vues : 511

Re: Remplir une feuille en fonction de valeurs de cellules

Bonjour, Essaie cette macro : Sub Test() Dim WsS As Worksheet, WsC As Worksheet Dim Cel As Range, Cible As Range Set WsS = Worksheets("Feuil1") Set WsC = Worksheets("Feuil2") For Each Cel In WsS.Range("A2", WsS.Range("A" & Rows.Count).End(xlUp)) Set Cible = WsC.Range("A" & Rows.Count).End(xlUp)(2) C...
par frangy
22 novembre 2016, 16:06
Forum : Excel - VBA
Sujet : Copier une formule en vba
Réponses : 2
Vues : 100

Re: Copier une formule en vba

Bonjour,

Les guillemets doivent être doublés :
.Cells(LigDeb, ColDeb).FormulaLocal = "=SOMMEPROD(JOURSEM(d.dates;2)=$B370)*(d.données<>"""")"
A+
par frangy
22 novembre 2016, 14:51
Forum : Excel - VBA
Sujet : Somme en fonction des valeurs uniques
Réponses : 5
Vues : 754

Re: Somme en fonction des valeurs uniques

Bonjour, Autre solution : 1) Tu copies la colonne Name et tu la colles dans la colonne A de la Feuil1. 2) Tu supprimes les doublons de Feuil1!A:A (DONNEES > Supprimer les doublons). 3) En Feuil1!B2, tu places la formule : =SOMME.SI(Feuil2!$A$2:$A$40;Feuil1!$A2;Feuil2!$E$2:$E$40) 4) Tu tires la formu...
par frangy
21 novembre 2016, 18:49
Forum : Excel - VBA
Sujet : Valeur Listbox
Réponses : 4
Vues : 85

Re: Valeur Listbox

Re-bonjour,

Essaie comme cela
Private Sub ListBox2_Click()
Label1 = "Rechercher un produit"
Frame1.Visible = False
Frame2.Visible = True
DCIR = Me.ListBox2.List(Me.ListBox2.ListIndex, 0)
End Sub
A+
par frangy
21 novembre 2016, 13:09
Forum : Excel - VBA
Sujet : Date de péremption
Réponses : 3
Vues : 398

Re: Date de péremption

Bonjour,

Ton fichier en retour
pharmacie-1.xls
(100 Kio) Téléchargé 139 fois
A+
par frangy
21 novembre 2016, 11:46
Forum : Excel - VBA
Sujet : AIDE pour un affichage des coordonées d'une cellule
Réponses : 4
Vues : 127

Re: AIDE pour un affichage des coordonées d'une cellule

Bonjour, Teste cette procédure et dis-nous si cela correspond au résultat attendu Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) Dim i As Integer, j As Integer Dim Ecart As Double Dim CelMin As Range Ecart = 10000 If Target.Address = "$H$15" Then Range("D21:R33").Interior.Color ...
par frangy
21 novembre 2016, 09:41
Forum : Excel - VBA
Sujet : Valeurs "Cases à cocher"
Réponses : 9
Vues : 191

Re: Valeurs "Cases à cocher"

j’aimerai savoir si, en dupliquant les options cela était encore possible, car le but c'est de garder les différentes valeurs (20 au total), pour en faire au final une moyenne. Tu peux placer les boutons d'option dans des zones de groupe afin que chaque ensemble de 4 boutons soit lié à une cellule ...
par frangy
19 novembre 2016, 09:41
Forum : Excel - VBA
Sujet : Valeurs "Cases à cocher"
Réponses : 9
Vues : 191

Re: Valeurs "Cases à cocher"

Bonjour, D'après ton descriptif, il est préférable d'utiliser des boutons d'option. Les boutons sont liés à une seule cellule qui reçoit le numéro de l'option sélectionnée. Il reste ensuite à effectuer le lien entre ce numéro et la valeur numérique correspondante. Exemple : Meru.xlsx Tu noteras que ...