ACC: Cómo manipular los códigos postales en Microsoft Access

IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.

Haga clic aquí para ver el artículo original (en inglés): 163604
Este artículo se ha archivado. Se ofrece "tal cual" y no se volverá a actualizar.
Moderado: Requiere conocimientos de interoperabilidad, codificación y básico de las macros.

Resumen
Puede manipular los códigos postales en Microsoft Access si se cambia el tipo de datos,máscara de entrada, o formato de un campo de código postal. Este artículo muestra cómo amanipular códigos postales que ya están almacenadas en una tabla y cómo dar formato aCódigos postales cuando se introduce en un formulario.

En este artículo contiene las opciones siguientes:
  • Crear la tabla PostalCodeExample usada en este artículo
  • Restauración de los ceros iniciales que faltan
  • Guardar con formato los códigos postales
  • Quitar guiones al final de códigos postales existentes
  • Insertar guiones en nueve existentes dígitos (postal + 4), los códigos postales
  • Los códigos postales de formato para su uso en informes o para su uso por medio de otros Aplicaciones
Algunas partes de este artículo se supone que está familiarizado con Visual Basic paraLas aplicaciones y con la creación de aplicaciones de Microsoft Access mediante laherramientas de programación suministradas con Microsoft Access. Para obtener más informaciónacerca de Visual Basic para Aplicaciones, consulte la versión de laManual "Creación de aplicaciones con Microsoft Access".

Nota: se denomina Access Basic de Visual Basic para Aplicaciones en MicrosoftAccess versión 2.0. Para obtener más información acerca de Access Basic, consulteel manual "Creación de aplicaciones".
Más información

Crear la tabla PostalCodeExample usada en este artículo

En la tabla de ejemplo siguiente se utiliza en este artículo. Siga estos pasos paraCree la tabla:
  1. Inicie Microsoft Access y cree una nueva base de datos en blanco.
  2. Cree la siguiente tabla nueva en la vista Diseño:
           Table: PostalCodeExample       ------------------------       Field Name: PCode       Data Type: Text						
  3. Guarde la tabla PostalCodeExample. No cree una clave principal.

Restauración de los ceros iniciales que faltan

Almacenar los códigos postales de un campo de texto en la tabla en lugar de en un númerocampo. Microsoft Access sigue las convenciones matemáticas estándar cuandoalmacenar datos numéricos, por lo que si introduce un código postal que contenga líder en lase pone a cero en un campo numérico, Microsoft Access elimina los ceros cuándo inicialesguardar los datos. Por ejemplo, si escribe 01002 en un campo numéricoMicrosoft Access almacena el número como 1002.

Siga estos pasos para restaurar los ceros iniciales para los códigos postales que se hanalmacena en un campo numérico:
  1. Abra la tabla PostalCodeExample, que acaba de crear, en la hoja de datos Permite ver y especificar los siguientes registros de código postal de cinco y nueve dígitos para el campo PCode:
          00345      023456789						
  2. Cambie la tabla de PostalCodeExample a la vista Diseño.
  3. Cambie el tipo de datos del campo PCode a número y configure el tamaño del campo propiedad de entero largo.
  4. Guarde la tabla y cambie a la vista de hoja de datos. Tenga en cuenta que el interlineado se quitaron ceros.
  5. Cambie la tabla de PostalCodeExample a la vista Diseño y cambiar los datos Escriba de nuevo del campo PCode al texto para que pueda almacenar los archivos los ceros iniciales en los códigos postales. Guarde la tabla.
  6. Cree la siguiente consulta de actualización basada en la tabla PostalCodeExample.

    Nota: en este ejemplo, el carácter de subrayado (_) al final de la Actualización a la línea se utiliza como un carácter de continuación de línea. Quitar el subrayado del final de la línea cuando se crea esta consulta.
          Query Name: RestoreLeadingZeros      Query Type: Update Query      Field: PCode      Table: PostalCodeExample      Update To: IIf(Len([PCode])<6, Format([PCode],"00000"), _                     Format([PCode],"000000000"))						
  7. Ejecute la consulta y confirme la actualización cuando se le pida. Abrir el Tabla de PostalCodeExample en la vista Hoja de datos. Tenga en cuenta que el interlineado se han restaurado ceros.

Guardar con formato los códigos postales

El Asistente para máscaras de entrada le ayuda a crear una máscara de entrada para los códigos postalesalmacena un guión después del quinto dígito como carácter literal. Sin embargo, cuandoel guión se almacena como un carácter literal, se guarda en todos los códigos postales,Si es un código de cinco o nueve dígitos. Será de US Postal ServiceAcepte los códigos postales con finales guiones, pero puede desear evitar finalesguiones por motivos estéticos.

Si se omite la máscara de entrada, para ahorrarse guiones al final en los 5 dígitosCódigos postales. A continuación, se puede manualmente incluir el guión cuando se escribenueve dígitos (postal + 4) los códigos postales, o puede utilizar un formulario mediante programaciónInsertar el guión después de nueve dígitos (postal + 4) se escribió el código postal. En elcualquiera de los casos, también se obtiene la capacidad de introducir códigos postales externos enla tabla.

Siga estos pasos para crear un formulario mediante programación se insertará unguión cuando nueve dígitos (postal + 4) se introduce el código postal:
  1. Crear un nuevo formulario basado en la tabla de PostalCodeExample mediante la Autoformulario: Asistente en columnas para Microsoft Access 97 y 7.0, o la Asistente para autoformularios en Microsoft Access 2.0.
  2. Guarde el formulario como frmFormatZIP y, a continuación, conéctelo a la vista Diseño.
  3. En el menú Ver, haga clic en código.
  4. Escriba la línea siguiente en la sección de declaraciones de clase del formulario módulo:

    Dim mvarZip
  5. Escriba los siguientes procedimientos:
          Private Sub PCode_AfterUpdate()         If IsEmpty(mvarZip) Then Exit Sub         If Len(mvarZip) = 6 Then            Screen.ActiveControl = Left(mvarZip, Len(mvarZip)-1)         Else            Screen.ActiveControl = Format(mvarZip, "@@@@@-@@@@")         End If         mvarZip = Empty      End Sub      Private Sub PCode_BeforeUpdate(Cancel As Integer)         Dim ctlZip As Control         Dim strTitle As String         Dim strMsg As String         Const cYesNoButtons = 4         Const cNoChosen = 7         mvarZip = Empty         Set ctlZip = Screen.ActiveControl         If ctlZip Like "#####-####" Or ctlZip Like "#####" Then            Exit Sub         ElseIf ctlZip Like "#########" Or ctlZip Like "#####-" Then            mvarZip = ctlZip         Else            strTitle = "Not a ZIP Code."            strMsg = "Save as entered?"            If MsgBox(strMsg, cYesNoButtons, strTitle) = cNoChosen Then               Cancel = True            End If         End If      End Sub						
  6. Cambie el formulario a la vista Formulario y agregue los siguientes nuevos registros para el Campo Pcode:
           01234       987651011       WA1 1DP       1010						

    Tenga en cuenta que cuando escribe BA1 1DP y 1010, se le solicitará si usted ¿desea guardar los códigos postales tal como se indicó. Haga clic en Sí.
  7. Guardar y cerrar el formulario de frmFormatZIP y, a continuación, abra el Tabla de PostalCodeExample en la vista Hoja de datos. Tenga en cuenta que los cinco dígitos ZIP código que ha especificado no contiene un guión, código postal de nueve dígitos que se hace introducido contiene un guión y los otros dos registros que ha especificado son almacena tal como se indicó.

Quitar guiones al final de códigos postales existentes

Puede utilizar una consulta de actualización para quitar guiones al final de ZIP existentecódigos. Siga estos pasos para quitar los guiones al final:
  1. Abra la tabla PostalCodeExample en la vista Hoja de datos y escriba el siguientes registros para el campo Pcode:
          12345-      987654321      12345-6789						
  2. Cree la siguiente consulta de actualización en basado en la PostalCodeExample tabla:
           Query Name: RemoveTrailingDashes       Query Type: Update Query       Field: [PCode] Like "#####-"       Criteria: True       Field: PCode       Table: PostalCodeExample       Update To: Left([PCode], Len([PCode])-1)						
  3. Ejecute la consulta y confirme la actualización cuando se le pida.
  4. Abra la tabla PostalCodeExample en la vista Hoja de datos. Tenga en cuenta que el se quitó el guión final después de 12345.

Insertar guiones en nueve existentes dígitos (postal + 4), los códigos postales

Puede utilizar una consulta de actualización para insertar guiones que faltan en el ZIP de nueve dígitoscódigos. Siga estos pasos para insertar un guión en los códigos postales de nueve dígitos:
  1. Abra la tabla PostalCodeExample en la vista Hoja de datos y escriba el siguientes registros para el campo Pcode:
           12345       987654321       12345-6789						
  2. Cree la siguiente consulta de actualización basada en la tabla PostalCodeExample:
           Query Name: InsertDashes       Query Type: Update Query       Field: [PCode] Like "#########"       Criteria: True       Field: PCode       Update To: Format([PCode],"@@@@@-@@@@")						
  3. Ejecute la consulta y confirme la actualización cuando se le pida.
  4. Abra la tabla PostalCodeExample en la vista Hoja de datos. Tenga en cuenta que el nueve dígitos (postal + 4) todos los códigos de ZIP contienen guiones después del quinto dígito.

Los códigos postales de formato para su uso en informes o para su uso por otras aplicaciones

Puede utilizar los códigos postales en un informe de Microsoft Access o en otraaplicación (por ejemplo, Microsoft Word) sin ninguna modificación si éstos yase guardan en el formato que desee usar. Secciones anteriores de este artículoDemuestre cómo cambiar la forma en que se almacenan los formatos de código postal existentesen la tabla. Sin embargo, si desea dar formato a los códigos postales sin cambiar else almacenan de forma, puede seguir estos pasos para crear temporalmente elFormato de código postal que desee utilizar.

Siga estos pasos para mostrar los códigos postales con formato en una consulta de selección:
  1. Abra la tabla PostalCodeExample en la vista Hoja de datos y escriba el siguientes registros para el campo PCode:
           54321       12345-       987654321       12345-6789						
  2. Cree la siguiente consulta basada en la tabla PostalCodeExample.

    Nota: en este ejemplo, el carácter de subrayado (_) al final de la Línea del campo se utiliza como un carácter de continuación de línea. Quitar el subrayado del final de la línea cuando se crea esta consulta.
           Query Name: FormatZIPCodes       Query Type: Select Query       Field: Postal Code: IIf([PCode] Like "#####-", Left([PCode], _                           Len([PCode])-1), IIf([PCode] Like _                           "#########",Format([PCode], "@@@@@-@@@@"), _                           [PCode]))						
  3. Ejecutar la consulta. Tenga en cuenta que no se muestran guiones al final y que un aparece el guión después del quinto dígito en los códigos postales de nueve dígitos. Puede utilizar Esta consulta en lugar de la tabla cuando se crea el informe o compartir los datos con otra aplicación. Seleccione pantallas de consulta los códigos postales con formato pero no se modifica código postal existente de la tabla datos.
Referencias
Para obtener más información acerca de las consultas de actualización, busque el índice de la Ayuda"consultas de actualización".

Para obtener más información acerca de la función Format(), busque el índice de la Ayuda"Format (función)" o "Format (función) $".

Para obtener más información acerca de las máscaras de entrada, busque "información de entrada en el índice de la Ayudamáscaras."

Para obtener más información acerca del uso de datos de Microsoft Access en Microsoft Word,el índice de la Ayuda de búsqueda para "Word (Microsoft)".
combinar combinar código postal

Propiedades

Id. de artículo: 163604 - Última revisión: 12/04/2015 16:21:57 - Revisión: 4.0

Microsoft Access 2.0 Standard Edition, Microsoft Access 97 Standard Edition

  • kbnosurvey kbarchive kbhowto kbusage kbmt KB163604 KbMtes
Comentarios