Inserer formule si valeur en A non nul

Résolu
Arcs -  
Arcs59 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Après quelques recherche je n'ai pas trouver ce que je cherchais. En effet, je débute sur VBA excel, je ne suis donc pas très agile et je pense que ma requête est pourtant simple.

Je voudrais que une macro par exemple, vérifie la colonne R a partir de la ligne 4 pour toutes les valeurs de la colonne A.
Si A et R non vide -> pas d'action
Si A non vide mais R vide -> insertion dans R d'une formule qui prend en compte la valeur en A et en B correspondante.

Et ce jusqu'à la fin des valeur de A.

Exemple :si R35=nul -> R35=CONCATENER(A35;B35)

Merci d'avance.
A voir également:

4 réponses

ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Bonjour

Un exemple

Const co1 = "A"
Const co2 = "R"
Const co3 = "B"
Const lideb = 4
Const NF = "Feuil1"

Public Sub EcritFormule()
Dim li As Long, lifin As Long, f As String, a, b
With Sheets(NF)
lifin = .Range(co1 & Rows.Count).End(xlUp).Row
For li = lideb To lifin
If .Range(co1 & li) <> "" And .Range(co2 & li) = "" Then
f = "=CONCATENER(" & co1 & li & ";" & co3 & li & ")"
.Range(co2 & li).FormulaLocal = f
End If
Next li
End With
End Sub

Cdlmnt
1
Arcs59 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup cela fonctionne bien !!
Mais je voudrais mettre un lien hypertexte (désolé de tout dire en deux fois) qui mène a un dossier en local, dossier qui dépend des valeur en A et B...
Merci encore.
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
1
Arcs59 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Merci c'est exactement sa !! :)
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
De rien

Si c'est fini, peux tu mettre le sujet à Résolu (en haut à droite de ton premier message)

Cdlmnt ccm81
0
Arcs59 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Ce sera fait ;) dernière question : j'ai remarqué que les liens hypertexte mènent vers le classeur obligatoirement (clic droit sur la cellule, modifier le lien hypertexte -> il est sélectionné" emplacement dans ce document")
Car quand je met le liens du dossier en local cela ne fonctionne pas, et il suffit que je touche a la cellule pour que cela fonctionne.

Merci encore, je touche au but grâce a vous.
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
0
Arcs59 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
Parfait sa fonctionne, merci beaucoup.
0