diff --git a/apps/web/src/app/features/masters/master-lookups.ts b/apps/web/src/app/features/masters/master-lookups.ts
index 88c90a2..6c4073d 100644
--- a/apps/web/src/app/features/masters/master-lookups.ts
+++ b/apps/web/src/app/features/masters/master-lookups.ts
@@ -57,6 +57,7 @@ export const MASTER_LOOKUPS = {
     orderby: 'CardCode',
     baseFilter: `CardType eq 'cSupplier'`,
     nameKey: 'CardName',
+    codeWidth: '150px',
     columns: [col('CardCode', 'Código', { width: '130px', mono: true }), col('CardName', 'Nombre')],
   } satisfies VhLookup,
   itemGroup: {
diff --git a/apps/web/src/app/shared/form/lookup-field.ts b/apps/web/src/app/shared/form/lookup-field.ts
index 3dc1df9..dbd839a 100644
--- a/apps/web/src/app/shared/form/lookup-field.ts
+++ b/apps/web/src/app/shared/form/lookup-field.ts
@@ -41,7 +41,7 @@ const NAMES = new Map<string, string>();
     >
       <sbo-input
         #box
-        [width]="lookup().nameKey ? '96px' : undefined"
+        [width]="lookup().nameKey ? (lookup().codeWidth ?? '96px') : undefined"
         [value]="shown()"
         (valueChange)="typing($event)"
         [readonly]="readOnly()"
diff --git a/apps/web/src/app/shared/value-help/value-help.types.ts b/apps/web/src/app/shared/value-help/value-help.types.ts
index 234ee24..9051ca6 100644
--- a/apps/web/src/app/shared/value-help/value-help.types.ts
+++ b/apps/web/src/app/shared/value-help/value-help.types.ts
@@ -26,6 +26,8 @@ export interface VhLookup {
   alsoMatch?: readonly string[];
   /** Columna con el nombre de lo elegido: el campo lo muestra junto al código (`Name` de un grupo, `SalesEmployeeName`). */
   nameKey?: string;
+  /** Ancho del casillero del código cuando hay `nameKey` (por defecto 96 px; un código largo como el de un proveedor necesita más). */
+  codeWidth?: string;
   /** Cómo se muestra el código guardado en una celda (la cuenta con su formato) y cómo se aprenden los de las filas elegidas. */
   codes?: CodeDisplay;
 }