Excel – travailler avec du text sur plusieurs feuilles de travail

J'ai un file Excel qui utilise plusieurs feuilles de calcul pour résumer les paiements et le calendar des paiements pour plusieurs propriétés.

Il est configuré pour que la première feuille soit un résumé de tout, avec des feuilles suivantes détaillant différentes propriétés. J'ai une colonne (juste pour les descriptions) que je souhaite ramener le text à la première feuille, et s'il y a plusieurs inputs sur les feuilles suivantes pour me faire savoir.

Je sais que Excel n'aime pas travailler avec du text sur plusieurs feuilles de calcul, de sorte que ce code ci-dessous a bien fonctionné pour faire apparaître une seule input pour moi. Il sera toujours dans la même cellule sur les feuilles suivantes.

=IF(COUNTA(Sheet1:Sheet5!D15)=0,"", IF(COUNTA(Sheet1:Sheet5!D15)=1, (Sheet1!D15&Sheet2!D15&Sheet3!D15&Sheet4!D15&Sheet5!D15), "--> Multiple Ensortinges")) 

Cependant, j'ai rencontré une situation où j'ai besoin de mettre deux inputs identiques dans les feuilles suivantes.

Pour un exemple en utilisant | en rupture de feuille

"" | "Payé # 1" | "" | ""

"Payé # 1" | "Payé # 1" | "" | ""

"" | "Payé # 2" | "Payé # 1" | ""

Le cas n ° 2 est l'impair où il est correct d'avoir plusieurs inputs identiques, mais # 3 où elles sont différentes doit être mise en surbrillance, comme je l'ai maintenant (-> Plusieurs inputs) est suffisant. À l'heure actuelle, les deux cas seraient mis en évidence.

Je ne sais pas par où commencer vraiment, je ne peux pas find une reference 3D (quelque chose dans le sens de la correspondance) qui gère le text, des suggestions?

Comme toujours, merci d'avance, j'apprécie vraiment toute l'aide.

Une façon serait d'écrire un UDF qui renvoie la string requirejse. Malheureusement, les parameters UDF ne prennent pas en charge les gammes 3D, donc un travail nécessite.

Selon votre question, vous souhaitez considérer la même cellule dans toutes les feuilles, à l'exception de la fiche récapitulative. Sur cette base, cette UDF renverra une concaténation de la même cellule dans toutes les feuilles, à l'exception de la feuille sur laquelle la formule est placée. Vous pouvez l'adapter pour returnner d'autres choses comme vous le souhaitez.

Notez que j'ai simplifié la démonstration d'une méthode, vous devriez gérer les cas d'erreur, comme si vous référer à> 1 cellule ou une cellule sur une autre feuille / classur.

 Function MergeSheets(r As Range) As Variant Dim a As Ssortingng, s As Ssortingng Dim sh As Worksheet Application.Volatile a = r.Address For Each sh In r.Worksheet.Parent.Worksheets If sh.Name <> r.Worksheet.Name Then s = s & sh.Range(a).Value End If Next MergeSheets = s End Function