Astuces Excel
  1. Astuces Excel
  3. Formatage d'un champ de text Excel à partir d'Access
Intereting Posts
Une puce de macro peut-elle extraire une sortie d'une command line directement dans une feuille? Référencer un path de file et un nom de feuille de calcul dans Excel Une fois que les feuilles Excel dans un classur ont été enregistrées en tant que .csv, vous ne pouvez pas revenir à .xlsm Trouver les 5% les plus élevés dans Excel Excel VBA – si la cellule contient une copy de text coller à une autre ligne (espacement inégal) Diviser le file Excel par nombre de lignes Les colors RGB de la série graphique Excel 2010 résultent lors de la relance? Transfert de certaines cellules d'une feuille à une autre dans Excel malgré l'insertion / extraction de colonne / ligne Ne résume pas correctement la colonne entre toutes les feuilles dans Workbook Modification de l'ordre des feuilles de calcul dans un classur à l'aide de IronPython (ou .NET) Split Cell dans Excel 2007 Faites glisser une formule verticalement et horizontalement dans Excel Comment créer Excel avec la fonction de filtrage automatique de ObservableCollection dans C # Lancer HSSFWorkbook to Workbook Le test du path dans SysWOW64 renvoie true si le path d'access n'existe pas, mais existe dans System32

Formatage d'un champ de text Excel à partir d'Access

J'ai une string comme "samedi 28 novembre 2015 11:59:59 PM GMT-5" dans une feuille de calcul Excel et je souhaite supprimer le jour de la semaine et le timezone avant de l'importer pour accéder à l'aide de VBA. J'ai essayé :

ExcelWorksheet.Cells (1 + counter, nIdCol) = left ((ExcelWorksheet.Cells (1 + counter, nIdCol)), Find ("GMT", ExcelWorksheet.Cells (1 + counter, nIdCol) – 1)) "

mais a constaté que "Find" n'est pas une fonction Access.

Une idée de le faire?

Si vous souhaitez le faire dans Excel, avant d'importer pour accéder à VBA, vous pouvez utiliser cette formule pour les recadrer. Remarque: Je suppose que chacune de vos strings aura "GMT" à la fin pour désigner le timezone, et aura a , après le jour de la semaine.

Si le Saturday, November 28, 2015 11:59:59 PM GMT-5 est en A1, utilisez cette formule en B1:

=TRIM(MID(A1,SEARCH(", ",A1)+1,SEARCH("GMT",A1)-SEARCH(", ",A1)-2))

Essayez d'utiliser la fonction Instr (). Remplacer Find ("GMT") avec 

 Instr(ssortingng:=ExcelWorksheet.Cells(1 + counter, nIdCol).Value, subssortingng:="GMT") - 1

Plus sur la fonction Instr (): http://www.techonthenet.com/excel/formulas/instr.php