Fråga : Cell som maskerar i Excel

Pröva förmiddag I att skriva en makro för att läsa en cell som innehåller lösenord från en Excel, täcker för multipeldatabasanslutningar (dessa är dynamiska och kan vara till multipeldatabaser).

Is där a långt som maskerar cellen, så att användarena vem öppnar räknearket inte bör vara kompetent att läsa cellen, bara den måste vara redigerbara, och bör läsas från makroen? " klar "

Svar : Cell som maskerar i Excel

Är här en färdig lösning som fungerar något liknande som, du önskar.

Från ditt projektera utforskaren i VBA, döljer en täcka som xlSheetVeryHiddenen (för synlighetsegenskapen).
Från ett synligt täcka, välj en cell som ska är tillgänglig till användare, som ska ändring lösenordet.

Från det synligt täcka kodifierar bildar, tillfogar detta kodifierar:
-----
Explicit alternativ

Privata underWorksheet_Change (ByVal uppsätta som mål som spänner),
    Om (Target.Column = 2 och Target.Row = 1) därefter
        Dunkel newPassword: newPassword = Target.FormulaR1C1
        Target.FormulaR1C1 = "",
        Application.ActiveWorkbook.Worksheets (2). Celler (1, 1) .FormulaR1C1 = newPassword
    Avsluta om
   
Avsluta suben
-----
Se till att kolonnen (2 i mitt exempel) och ro (1 i mitt exempel) ska passformen din lösenordcell.
Ändra indexet av din gömda arbetssedel till anslå en (2 i mitt fall - det är ett nollbaserat index), också.

Till retreive ditt gömda lösenord, använder detta kodifierar:

Application.ActiveWorkbook.Worksheets (2). Celler (1, 1) .FormulaR1C1

Glöm inte till uppsättningen anslåindexet där också.

Slutligen glöm inte att sätta ett lösenord på ditt projekterar, så annat folk kan inte ändra täckasynligheten.

========

Funderare I den är det enda långt att du kunde uppnå exakt vad du önskar.

PS. Naturligtvis du kan byta ut lösenordet med ********, i stället för att göra klar textnågot liknande i mitt exempel.