Comment puis-je déprotéger mon projet VB à partir d'une macro vb? J'ai trouvé ce code: Sub UnprotectVBProject(ByRef WB As Workbook, ByVal Password As Ssortingng) Dim VBProj As Object Set VBProj = WB.VBProject Application.ScreenUpdating = False 'Ne peut procéder si le projet est non-protégé. If VBProj.Protection <> 1 Then Exit Sub Set Application.VBE.ActiveVBProject = VBProj 'Utilisation […]
Je suis très nouveau avec le encoding VB, j'essaie d'save plusieurs feuilles de calcul de files excel vers csv, je ne sais pas le faire pour plusieurs feuilles, mais j'ai trouvé un moyen de faire pour un seul file. J'ai trouvé le code sur ce site qui est très utile pour ce que j'essaie de […]
J'ai un file activé par macro xlsx . Comment puis-je le configurer dans le gestionnaire de tâches afin que tous les jours au gestionnaire de tâches de 9 heures ouvrent le classur, débloquer la macro et fermer le classur. Jusqu'à présent, j'utilise Application.OnTime . . . Mais je me rends count que garder le file […]
Je veux créer une string délimitée par des virgules de la Gamme A1:A400 . Quelle est la meilleure façon de faire cela? Devrais-je utiliser une boucle For ?
Par exemple A1:I A2:am A3:a A4:boy Je veux les merge tous sur une seule cellule "Iamaboy" Cet exemple montre que 4 cellules se fusionnent dans une cellule, mais j'ai plusieurs cellules (plus de 100), je ne peux pas les taper un par un en utilisant A1 & A2 & A3 & A4 que puis-je faire?
Je dois publier des résultats en tant que file .csv , qui est analysé ultérieurement par un autre process. Pour produire ces résultats, j'ai un énorme classur contenant toutes les macros et les fonctions dont j'ai besoin. Est-il possible de "créer" un file .csv séparé de VBA ? Est-il possible d'utiliser des fonctionnalités VBA pour […]
J'ai une feuille Excel qui a des données dans la colonne A. Il existe de nombreux caractères spéciaux dans les cellules. Lorsque je sauvegarde la feuille au format .txt, je reçois des virgules inversées au début de chaque ligne. J'ai essayé à la fois manuellement et par macro en sauvegardant le file au format .txt. […]
Ma feuille de calcul requirejs la formule de tableau suivante dans BG2. =INDEX('Client'!O$2:O$347473, MATCH(1, (('Client_Cost'!D$2:D$347473='Client'!BC2)* ('Client_Cost'!E$2:E$347473='Client'!BE2)), 0)) Cela fournit une correspondance à deux colonnes (Client_Cost! D: D au client! BC2 AND Client_Cost! E: E to Client! BE2) et renvoie la valeur correspondante de Client! O: O. Le grand nombre de lignes rend la formule de […]
J'ai une colonne de dates (colonne A) stockée en tant que text au format aaaa-mm-dd que j'essaie de convertir en dates, finalement pour pouvoir faire des searchs contre elles. J'ai lu quelques sujets ici et j'ai essayé certaines des suggestions, mais je ne peux rien faire. L'un utilisait: Columns("A").Select Selection.NumberFormat = "date" Cela a changé […]
Je veux vérifier les arrays vides. Google m'a donné des solutions variées mais rien n'a fonctionné. Peut-être que je ne les applique pas correctement. Function GetBoiler(ByVal sFile As Ssortingng) As Ssortingng 'Email Signature Dim fso As Object Dim ts As Object Set fso = CreateObject("Scripting.FileSystemObject") Set ts = fso.GetFile(sFile).OpenAsTextStream(1, -2) GetBoiler = ts.ReadAll ts.Close End […]